I 

4 

I 

•s 

i 

i 

i 

! 

j 

i 

I 

> 

i 

I 

i 

! 

i 




A INTELIGENCIA 
ARTIFICIAL ESTA AQUI 

Programa do mes: 

GABRIELA, UM COMPUTADOR 
QUE APRENDE 



Para o Apple: 
OBSERVANDO OS CEUS 

Para o TK 83/85: 

O PULO DO CAVALO 



Calculadoras: 

UMA SECAO VOLTADA 
AS CALCULADORAS 

programAveis 



EXEMPLAR DE ASSINANTE - VENDA PROIBIDA Ano II - N? 15 - 1984 Cr$ 2.700.00 




A III Feira International de Informa- 
tica conseguiu ser o maior even to ja rea- 
lizado na area. Contou com a presenga 
de representantes de diversos pa/ses 
estrangeiros como Paquistao. Asempre- 
sas fee ha ram contratos para exporta- 
gao de seus produtos e o publico ficou, 
de certa forma, satisfeito. Como no a no 
passado, as empresas nao deixaram de 
la do os brindes para cativar a atengao do 
publico presente. As recepcionistas da 
Itautec, vestidas de mo/eque , nas cores 
azul e amare/o, distribuiram bonequi- 
nhos na forma de passarinho branco 
com chapeuzinho amarelo que lembra- 
vam o micro Itautec- JR. Os brochinhos, 
sa col in has, adesivos e ate mesmo pe- 
quenas agendas te/efonicas fornecidas 
pela Xerox foram outras atragoes que 
nao faltaram nos cerca de 300 estandes 
da Feira. Uma atragao a parte foram as 
esculturas existentes logo na entrada do 
Riocentro, uma promogao feita pela Em- 
bratel , gragas ao talento de J.R. AJ/e- 
gretti, funcionario da empresa. 

Afora os brindes houve, como se 



esperava, alguns inconvenientes. Logo 
no initio, quase que nao teve exposi- 
gao dos traba/hos rea/izados pelas uni- 
versidades. Este foi um prob/ema oca- 
sionado pela nao liberagao de verbas por 
parte do BNDES , porem, de ultima bo- 
ra, a poderosa IBM entrou em cena. Li- 
berou US$ 20 mil para a SUCESU, e as 
instituigoes de pesquisa puderam com- 
parecer ao evento desde que mostras- 
sem os projetos desenvolvidos em con- 
junto com a empresa. 

Muitas empresas apresentaram Ian- 
game ntos ou inovagoes em seus eq ui pa- 
men tos. Flouve uma grande preocupa- 
gao, principalmente as maiores, em 
mostrar a imagem de empresa conso/i- 
dada no mercado, principalmente pro- 
fissional. Uma preocupagao demonstra- 
da pela IBM que levou a mesma con- 
cepgao de seu estande na ultima feira. 
Um tune I da tecno/ogia com o tema 
"Tecno/ogia, Aqui, Agora e para o Fu- 
turo". 

Na maioria dos estandes as mogas 
bonitas estavam sempre sorridentes 



apresentando os equipamentos que fi- 
cavam a disposigao da curiosidade do 
publico. Flouve tambdm inumeras pa- 
lestras promovidas por empresas como 
Prologica , SID, IBM, Serpro, Embratel, 
Jornal do Brasil, entre outras. Outra 
atragao presente na Feira foi o famoso 
Apple- Machintosh, que deixou muitos 
visitantes com agua na boca, nao so- 
mente pe/o Apple, mas tambem pel os 
PC's americano presentes no estande da 
IBM. 

Os langamentos foram em maior 
quantidade, mais uma vez ; na area de 
microinformatica (mais de 20). As gran- 
des novidades foram os compat/veis na- 
tional com os TRS-80 Color e os mi- 
cros da tin ha de 16 bits, compatlveis 
com o IBM PCxt. Alem dos micros a/gu- 
mas empresas trouxeram a feira, as 
grandes novidades na area de informa- 
tica: os super-micros e os mini natio- 
nals. Por exemplo, a Cobra com o Co- 
bra 480 e a E/ebra com o VAX- 750 na- 
tional. A.L.A. 



No vos equipamentos da linha TK 







A Microdigital foi a Informatica/ 
84 com um dos maiores estandes da 
Feira (na forma de um disco voador) e 
varios langamentos, tanto em termos de 
hardware como de perifericos e soft- 
ware. Mas o seu grande destaque ficou 
a cargo de duas novidades: o TKS-800, 
compativel com o TRS-80 Color, que in- 
corpora uma outra linha de micropes- 
soal na empresa, e o TK-2000 II, com- 
pativel ao TK-2000 I e que destina-se, 
principalmente, ao mercado profissional 
de microcomputadores, alem do robo 
dourado que recepcionava os visitan- 
tes. 

Os dois equipamentos foram apre- 
sentados juntamente com software e 
perifericos, objetivando dar um maior 
apoio tecnico ao usuario e dimensionar, 
qualitativamente, os equipamentos. No 
estande, a empresa mostrou os micros 
com o software Multicalc, uma planilha 
eletronica que, segundo seu diretor de 
produtos, Paulo Rodrigues Lauand, 
equipara-se ao Supervisicalc e caracte- 
riza um dos langamentos, o TK-2000-II, 



como o micro profissional — Visicalc 
mais barato, disponivel no mercado na- 
cional. Alem do Multicalc, a Multisoft — 
uma das empresas do grupo — langou 
programas como o Multifile, o Mala- 
Direta e a serie Vestibular, um pacote de 
20 programas educacionais. 

0 TK-2000 II sera comercializado 
nas versoes de 48 K e 128 K. Sendo que, 
tanto a versao de 48 K do 2000-11 como o 
TK-2000 I, que possui 64 K, poderao ser 
expandidos para 128 K atraves das ex- 
pansoes de memoria que a estara colo- 
cando no mercado. 

Alem destes novos equipamentos, 
a Microdigital apresentou tambem, a 
interface serial RS-232 C. Esta interface 
permite a conexao dos dois micros a 
redes, assim como ira possibilitar a co- 
municagao de dados entre micros, atra- 
ves de modem — que, conforme disse o 
representante da empresa, esta em fase 
de desenvolvimento — ou de outros pe- 
rifericos. Com o langamento da RS-232 
C, Lauand acredita que os micros da 
linha TK poderao participar, assim, de 



projetos do tipo Cirandao da Embratel e 
da rede Videotexto. "Mais isto — acres- 
centou — , so sera possivel apenas de- 
pois do primeiro trimestre de 85, pois 
esta dependendo da liberagao de soft- 
ware especifico para este tipo de apli- 
cagao". 

A outra linha dos produtos TK 

O novo micro TKS-800 foge da li- 
nha de produtos desenvolvidos ate ago- 
ra pela Microdigital. Compativel em 
hardware e software com o TRS-80 Co- 
lor, sera comercializado nas versoes de 
16 K e 64 K com opgao de expansao de 
16 para 64 K. Utiliza o microprocessador 
6809; tern nove cores; saldas para moni- 
tor de video profissional; impressora se- 
rial e para ate dois joyststicks analogi- 
cos, alem de permitir tambem, a cone- 
xao de cartuchos e de comunicagao 
mais especifica. 0 teclado, profissional, 
e do tipo maquina de escrever com 55 
teclas e traz incorporado a ele um co- 
mando duplo de RESET. 

Uma das interfaces apresentadas, 
foi desenvolvida especificamente para 
ele. Trata-se de um display com saida 
RF PalM para televisao colorida. 

0 TKS-800 atingira um mercado ja 
bastante concorrido. Ele ira atuar junta- 
mente com o CP-400, da Prologica, na 
mesma faixa de mercado. Porem, con- 
forme disse o diretor da empresa, "o 
micro possue uma qualidade diferente 
da dos seus concorrentes que e a co- 
nexao com CP/M". 0 prego medio da 
versao TRS-80 Color da Microdigital 
sera aproximadamente 50% acima do 
prego do TK-2000. A.L.A. 
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Embratel e Inteligencia Artificial 



Impressoras e supermini 
na Elebra 




0 Sistema MX 850 foi o primeiro 
produto da Elebra Computadores, lan- 
gado durante a lnformatica/84. 0 siste- 
ma MX 850 e um supermini computa- 
dor de 32 bits projetado para utilizacao 
em processamentos de dados nas areas 
industrial, cientificas e comerciais. 

Seu sistema operacional VMS su- 
porta, simultaneamente, processamento 
em tempo partilhado, interativo, em lo- 
tes e em tempo real. 0 MX850 tern es- 
paco enderegavel a 4 Gigabytes. 0 ta- 
manho fisico de sua memoria varia de 1 
a 8 Megabytes, permitindo que uma 
grande variedade de aplicagoes seja pro- 
cessada ao mesmo tempo. 

0 sistema MX850 oferece ao usua- 
rio todos os beneficios de hardware e 
software para a arquitetura de redes pu- 
blicas, locais e internacionais, e ainda de 
conexao a sistemas de maior porte, co- 
mo IBM, CDC, entre outros. Atraves de 
redes, processadores isolados ou siste- 
mas multiplos configurados em cluster, 
podem trocar mensagens, transferir 
arquivos, atualizar registros em banco 
de dados, alem de executar programas e 
partilhar recursos de perifericos e pro- 
cessadores, de forma transparente ao 
usuario e ao programa. 

0 MX850 pode utilizar os seguintes 
aplicativos entre outros: Datatrive, ma- 
nipulador de dados e relatorios; RMS, 
arquivos indexados, sequenciais; 
DBMS, banco de dados codasil; RDB, 
banco de dados relacional; FMS, geren- 
ciador de telas. 

0 MX 850 e um supermini de tec- 
nologia digital, fabricado aqui no Brasil 
atraves da transference de tecnologia, 
conforme determinagao da SEI, e sua 
comercializagao sera iniciada em Janei- 
ro do proximo ano. 

A Elebra Informatica tambem fez 
tres langamentos durante a Feira. Fo- 
ram apresentadas as impressoras Moni- 
ca Plus; Alice 9051 e a El 8035. A Ele- 
bra Telecom tambem esteve presente 
mostrando o sistema de controle distri- 
buido MAX/SD. F.F. 



A Embratel esteve com forga total 
na lnformatica/84. Durante a Feira, a 
empresa langou comercialmente o servi- 
go REMPAC — Rede de Comunicagao 
de Dados por Comutagao de Pacotes. 
Em sua primeira fase, o servigo funcio- 
nara com cinco dos oito centros de co- 
mutagao — Rio de Janeiro, Sao Paulo, 
Belo Horizonte, Brasilia e Curitiba. 

Segundo o presidente da Embratel, 
engenheiro Helvecio Gilson, colocar ao 
alcance das pequenas e medias empre- 
sas os beneficios da teleinformatica e o 
objetivo do servigo REMPAC. Ele expli- 
cou que as tarifas serao aplicadas de 
acordo com o tempo de utilizagao dos 
canais REMPAC e de acordo com a 
quantidade de informagoes utilizadas, o 
que reduzira os custos, democratizando 
as cornu nicagoes de dados no pais. 

Os servigos da REMPAC poderao 
ser acionados, atraves de terminais de 
dados inteligentes e com canais especi : 
ficos via rede telefonica ou via telex. E 
possivel interligar, um terminal operado 
em Modo Caractere, a 1200 bits por se- 
gundo, a uma porta de um computador 



Versacad: Ian 9a men to 
da Comicro 

A Comicro langou na Feira de In- 
formatica o produto que esta sendo con- 
siderado a menina dos olhos da empre- 
sa: o Versacad, um software onde o 
computador ajuda no desenho de proje- 
tos. Este novo software pode ser aplica- 
do a todos os projetos que envolvam a 
necessidade de desenho, como na enge- 
nharia mecanica, arquitetura, engenha- 
ria civil, estatistica, etc. 

O Versacad funciona para todos os 
micros compativeis da linha Apple e 
IBM- PC e ja esta sendo comercializado 
desde julho, embora so agora na Feira 
Informatica 7 84 tenha sido langado dire- 
tamenteao mecado. 

A Comicro distribui com exclusivi- 
dade o Versacad no Brasil e esta tra- 
zendo tambem outros softwares da li- 
nha CAD. O Images 2 D, programa des- 
tinado ao calculo estrutural, e o Bil of 
Materials, quantitative de materiais que 
foram utilizados no projeto, ambos in- 
terligados ao Versacad. 

Segundo representantes da empre- 
sa, a Comicro detectou no mercado a 
necessidade que engenheiros e profis- 
sionais das areas envolvidas com dese- 
nhos e graficos tinham de encontrar 
software disponiveis que pudessem ace- 
lerar seus trabalhos. O Versacad tern um 
manual em portugues, traduzido pela 
Comicro, elaborado por profissionais de 
documentag§o, atraves do qual qual- 
quer pessoa pode opera-lo sem a pre- 
senga de tecnicos. F.F. 



operando a 4800 bits por segundo em 
Modo Pacote. 

Outra novidade da Embratel, apre- 
sentada na lnformatica/84, foi o projeto 
de Inteligencia Artificial, que provocou 
muito intere.sse. 

"Ola, como vai? Fico muito conten- 
te com a oportunidade de conversar- 
mos." Este e um dos tipos de dialogo 
que o computador dotado de inteligen- 
cia artificial pode manter com o usuario. 
A tecnologia do processador natural de 
linguagem, ainda em testes, esta sendo 
desenvolvida desde janeiro pela Embra- 
tel, em convenio com o Instituto de Nu- 
trigao da Universidade Federal do Rio de 
Janeiro. 0 primeiro programa, mostrado 
durante a Feira, e um Orientador Nu- 
tricional. 

Segundo o chefe do DPD da Em- 
bratel, Mario Pinto da Luz, dotar um 
computador de inteligencia artificial e o 
primeiro passo para o pais provar que e 
possivel desenvolver tecnologia atual- 
mente disponivel apenas para os paises 
industrializados. F.F. 



O micro da Omega 

O microcomputador Omega 4000 
foi langado pela Omega durante a Feira 
de Informatica do Riocentro. O MPC 
4000 e compativel com o IBM/ PC e sis- 
temas compativeis da linha Apple. Sua 
unidade central possui memoria RAM de 
256 kBytes e memoria ROM de 40 kBy- 
tes; interface paralela e serial assincro- 
na. 

0 MPC 4000 conta com 5 slots de 
expansao para unidade de disco rigido 
ou flexivel; impressora paralela; impres- 
sora serial ou outro computador (RS 
232); Winchester de 5/10 Mb e modem. 
Tern tambem acionador de discos fle- 
xiveis dupla face, dupla densidade e ca- 
pacidade de 320/360 kBytes. 

Tambem foi langado pela Omega o 
terminal de video VDX 100 e o micro- 
computador MC 400. O MC 400 conta 
com memoria RAM de 64 kBytes, duas 
entradas de chaves para jogos, saida so- 
nora e 8 slots de expansao. Possui ate 14 
unidades de disco (de 5 1/4 ou 8), video 
de 80 colunas por 24 linhas, winchester 
5 Mb, entrada analogica de 16 canais, 
sintetizador de voz, modulo OM 8088 de 
16 bits, modulo Z80 e expansao de 128 
kBytes com coprocessador aritimetico 
8087. Como opgao, o MC 400 faz cone- 
x3o com microcomputadores e com mi- 
nicomputadores nacionais funcionando 
como terminal inteligente. Tern como 
software aplicativos o supervisicalc; ja- 
nela magica; controle de estoque, con- 
tabilidade, mala direta e muitos outros. 
F.F. 
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LZ Equipamentos e um novo micro TRS-80 Color nacional 



A LZ Equipamentos, segundo Luiz 
Antonio Zenobio da Costa, diretor tec- 
nico da empresa, surgiu ha dois meses 
como uma extensao da LZ Sistemas. 0 
surgimento da nova empresa foi conse- 
qiiencia dos projetos que vinham sendo 
desenvolvidos na area de hardware. 
Junto com a LZ Equipamentos surgiu 
tambem os tres produtos que a nova 
empresa apresentou em seu estande. 0 
Color 64, um micro compativel com o 
TRS-80 Color, o TPV — Terminal de 
Ponto de Venda e o CRC — Computa- 
dor de Recursos (um periferico que se 
destina a aplicacoes educativas). 



0 Color 64 pode ser conectado com 
o projeto Cirandao como um videoga- 
me, e ser utilizado em aplicacoes que 
envolvam a linguagem LOGO em ate 64 
kBytes. A LZ Equipamentos mostrou, na 
feira, o micro comutado com outros mi- 
cros atraves do CRC. Este comutador foi 
desenvolvido com o intuito de agilizar 
qualquer metodo de ensino que se utili- 
ze de um micro como instrumento com- 
plementar na educacao. Como afirmou 
o diretor tecnico da empresa, o profes^ 
sor, atraves do CRC, pode unir ate 11 
micros de seus alunos com o seu, assim 
como pode ter tambem, 11 micros utili- 



zando apenas uma unica impressora. 

0 novo equipamento foi lancado 
ja contando com o apoio da LZ Siste- 
mas, que desenvolveu cerca de 12 soft- 
ware para aplicacoes como: Sistema 
Dentista, Cadastro de Cliente e Empre- 
sas, Agenda Eletronica, entre outros. 

Ja o TPV, um outro lancamento, 
destina-se a aplicacoes que visam a re- 
solucao dos problemas de estoques das 
empresas. Suas caracteristicas tecnicas 
sao: protecao contra queda de energia, 
podendo ser ligado On-line ao micro, em 
grupos de ate 4 terminais, etc. A.L.A. 



"Ultra", o Banco de 
Dados da Cincom 

Com mais de 6 mil instalacoes em 
todo o mundo, a Cincom e uma softwa- 
rehouse independente que oferece solu- 
coes a mais de 30 diferentes computa- 
dores e, pelo menos, 45 diferentes siste- 
mas operacionais. Para a Informatica/ 
84, a Cincom levou, entre outros, o 
NET/MASTER, que permite gerenciar 
uma rede empresarial como se fosse 
uma unidade singular. A rede pode con- 
tar com uma unica ou varias CPU'S. 

0 NET/ MASTER, carro-chefe da 
empresa na Feira, fornece controle uni- 
co operador sobre um ambiente de rede 
de CPU local e aplicacoes multiplas re- 
motas. Possui quatro componentes inte- 
grados: gerenciamento avancado de re- 
des; integracao de redes; processamen- 
to distribuido e suporte ao gerencia- 
mento de dados, e comunicacoes entre 
os sistemas. 

Outra novidade da Cincom, apre- 
sentada na Feira, e o "Series One Plus", 
com quatro programas: 0 "Execu/File", 
que permite processar, recuperar, expor 
arquivos individual e entrar ou recupe- 
rar dados sem ter conhecimentos de 
programacao; 0 "Execu/ Writer", que 
edita, organiza e faz o layout de toda a 
correspondence, incluindo memoran- 
dum, cartas, comunicados tecnicos e 
documentos; "Execu/ Model" que per- 
mite a construcao de modelos de 
spreadsheet facilmente e com perfeicao. 
E indicado para orcar e processar proje- 
coes volumosas, projetar contas a pagar 
e receber outros planejamentos. 0 "Exe- 
cu/ Reporter" seleciona informacoes de 
qualquer programa e coloca-o em qual- 
quer formato, alem de outras funcoes. 0 
"Seris One Plus" tern ainda o "Execu/ 
Plot" e a Cincom oferece mais seis pro- 
gramas adicionais para informacoes es- 
pecializadas, como o "Series One Plus 
Financial", que se dedica aos profissio- 
nais da area financeira. 

A Cincom apresentou, tambem, 
seu novo lancamento ULTRA, o softwa- 
re de Banco de Dados interativo para o 
VAX. F.F. 



O CONGRESSO 

0 Informatica/ 84 reatizado no 
Riocentro, Rio de Janeiro foi, 
como muita gente esperava, um 
espetacu/o estupendo. A feira 
ocupou tod os os paviihoes (com 
mais de 300 expositores) e foi di- 
vidida em setores. O Congresso 
teve uma frequencia calculada 
em aproximadamente 5000 parti - 
cipantes contando com cerca de 
350 paineis, envolvendo pales- 
tra s, seminarios, debates , entre 
outros. 

Com o tema "Onde Estamos? Para 
Onde Vamos?" a SUCESU — Nacional 
apresentou o XVII Congresso Nacional 
de Informatica. Uma das promessas fei 
tas pelos organizadores — 18 terminais 
espalhados em diversos iocais, com a 
intencao de evitar filas — nao foi cum- 
prida, pelo menos nos primeiros dias, 
quando muitos congressistas perderam 
palestras, pelo fato de estarem nas filas 
tentando pegar seu materia! e crachas. 
Outra promessa, de 40 recepcionistas foi 
cumprida em parte, pois estas nem sem- 
pre tinham condicoes de responder as 
perguntas do publico, por falta de infor- 
macoes. Mas tirando os contras, o Con- 
gresso de Informatica este ano, em rela- 
cao aos anteriores, foi o que apresen- 
tou o maior numero de atividades. 

Nos primeiros dias, algumas pales- 
tras foram canceladas. Secoes como as 
destinadas a temas relacionados a in- 
fluence e consequencias do uso da in- 
formatica na sociedade tiveram pouca 
receptividade. Porem, as secoes tecni- 
cas, as conferences internacionais e as 
palestras que envolviam temas acerca da 
formacao e reciclagem profissional fo- 
ram, como se esperava, as mais fre- 
quentadas. 

Dentro das diversas secoes apre- 
sentadas no Congresso de Informatica/ 
84 algumas mereceram destaque por 
parte da Microhobby . Entre estas, res- 
saltamos aquelas relacionadas a Reci- 
clagem e Formacao Profissional. 



A informatizagao do ensino 

Proferida pela professora Ligia Al- 
ves Barros da UFRJ, a palestra "A Infor- 
matizacao do Ensino" nao teve um pu- 
blico muito grande. Foi constituido, na 
maior parte, de estudantes e pedagogos. 

De inicio, a professora destacou ser 
essencial, a partir da introducao do com- 
putador na escola, uma modificacao na 
educacao para que haja viabilizacao 
deste uso no ensino. Ligia Alves Barros 
salientou que deve-se levar em conta a 
linha de pensamento da crianca e, a par- 
tir dai, tracar-se o seu aprendizado. A 
professora afirmou que o computador 
deve ser encarado como um novo ins- 
trumento tecnologico, auxiliar no apren- 
dizado e de maneira alguma deve in- 
fluenciar a maneira de pensar do indi- 
viduo. 

Um outro ponto levantado pela 
professora nesta palestra foi o fator de 
que o suporte produzido (software) pa- 
ra tal finaiidade — o uso do computa- 
dor na escola — ou e desenvolvido por 
um informatico, que tern uma formacao 
tecnica, ou por um pedagogo que, por 
outro lado, nao possui conhecimento de 
informatica. Estes dois fatores, segundo 
ela, geram divergences na aplicacao da 
informatica no aprendizado. Conforme 
acrescentou Ligia Alves, esta divergen- 
ce e ocasionada, muitas vezes, por um 
suporte baseado em softwares educa- 
cionais que trazem implicitos uma rea- 
lidade educacional que nao a brasileira 
e, muitas vezes, nao levam em conta a 
linha de pensamento da crianca. 

A professora Ligia Alves Barros 
concluiu no final, que e preciso haver 
no processo de aprendizado, um agente 
que ela denominou de "catalizador". 
"0 efeito quimico da cataiizacao tern 
como principal agente o professor, pois 
e ele que viabiliza a 'reacao quimica' do 
individuo e a sociedade". E, conforme 
afirmou, o computador deve ser usado, 
se muito necessario, como um instru- 
mento auxiliar do professor e nao como 
principal agente desta cataiizacao pois 
— concluiu — este nao tern condicoes 
de passar pelas mesmas experiencias 
sociais do individuo. A.L.A. 
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Microtec e o XT-2002 



Considerado pela empresa como 
um produto de tecnologia de vanguar- 
da, a Microtec langou durante a Feira de 
Informatica o microcomputador XT- 
2002. 0 equipamento, segundo a Micro- 
tec, foi concebido com o que ha de mais 
avangado em hardware e software, ten- 
do como principal caracteristica a inte- 
gral compatibilidade com o microcom- 
putador IBM-XT. 

0 XT- 2002 oferece solucoes com- 
pletas a diversas aplicagoes, atraves de 
poderosos softwares operacionais, lin- 
guagens e pacotes multi-funcionais. In- 
terfaces e placas de expansoes elevam 
sua capacidade de processamento, mul- 
tiplicando duas memorias RAM e mag- 
neticas e seus recursos de comunicacao 
de dados entre diversos sistemas. 0 no- 
vo micro emula terminais IBM, termi- 
nals Burroughs e possui processamento 
em redes com outros sistemas XT-2002 
e PC-2001. 

0 novo micro tern algumas caracte- 
risticas especificas tais como: memoria 
ROM de 48 kBytes e memoria RAM ini- 
cial de 256 kBytes; interface serial pa- 
drao RS-232C para comunicacao de da- 
dos ou impressoras, com velocidade de 
ate 19.200 bauds; placa controladora de 
unidades de discos flexiveis 5 1/4, com 
capacidade para controlar ate 4 unida- 
des de discos flexiveis de 320 kBytes; 
placa controladora de unidades de dis- 
cos rigidos, com capacidade para con- 
trolar ate 4 unidades de discos tipo Win- 
chester de 5 ou 10 m Bytes. O XT-2002 

A SID e a nova conceppao 
de apresentapSo 
dos equipamentos 

A SID levou a feira este ano uma 
nova concepgao na montagem de seu 
estande para apresentacao de seus equi- 
pamentos. A principal preocupacao da 
empresa foi mostrar ao publico os pro- 
jetos em desenvolvimento. Para isto di- 
vidiu seu estande em setores: micro- 
computadores, automacao bancaria, 
microcomputadores emulando termi- 
nais Bourroughs e IBM, produtos 
Sharp, multiusuario conectado a rede de 
telex e os minicomputadores, alem de 
um auditorio para palestras. 

A empresa apresentou o projeto de 
seu terminal de ponto de venda, um 
concentrador de 16 bits para automacao 
bancaria que possui capacidade de su- 
portar ate 512 terminais financeiros, 
alem do projeto do supermicro multiu- 
suario. Este tern capacidade de atender 
ate 32 diferentes usuarios, memoria va- 
riando, modularmente, de 0,5 a 8 MBy- 
tes, e possui ampla capacidade de co- 
municagao. 

Alem dos equipamentos, a SID 
preocupou-se em mostrar os servicos 
existentes para seus produtos. A.L.A. 




possui tambem monitor de video mono- 
cromatico, fosforo verde, 12 polegadas, 
com reproducao da informagao de cor 
com tonalidade de intensidades varia- 
veis, alem de 85 teclas com repetigao 
automatica de caracteres, contendo 10 
teclas de fungoes e bloco numerico se- 
parado. 

Alem do novo micro, a Microtec 
apresentou na lnformatica/84 toda a li- 
nha de comunicagao com o XT-2002, 
como a placa MEM LL, modulo de me- 
moria de 512 kBytes, ate 1 MByte de 
memoria e processamento multi- 
usuario. O MCOX, modulo de comuni- 
cagao coaxial, que capacita do PC-2001 
e o XT-2002 a operar como uma esta- 
gao local inteligente de mainframes 
IBM, emulando os terminais 3278-mode- 
los 2, 3, 4 e 3279 — modelos 2A e 3A. 
F.F. 

Suprimentos na BASF e a 
inaugurapao de nova 
F£brica 

Dentro do programa de comemora- 
gao dos 50 anos do langamento da pri- 
meira fita magnetica, a BASF apresen- 
tou na Feira, um estande fechado e re- 
servado para um publico especifico. 

Logo de inicio a empresa patroci- 
nou o coquetel de langamento do even- 
to lnformatica/84, assim como a divul- 
gagao do Congresso de Informatica 
atraves de apoio financeiro para a con- 
fecgao de posters e cartazes. 

Porem, a atividade em que a BASF 
esteve mais fortemente presente foi no 
langamento do selo comemorativo inau- 
gurado pelo presidente Figueiredo na 
abertura da lnformatica/84. 

O representante tecnico da empre- 
sa, Luiz Cabizuca, afirmou que o fato 
que mais merece destaque dentro das 
comemoragoes dos 50 anos da apresen- 
tagao da fita magnetica e o langamento 
da fabrica de fjexidisk em Guaratingue- 
ta, Sao Paulo. Cabizuca disse que a no- 
va unidade industrial da BASF sera inau- 
gurada no proximo ano e possibilitara 
uma maior participagao da empresa na 
area, ja que e o primeiro projeto aprova- 
do para a fabricagao de flekidisks no 
Brasil. A.L.A. 



Verbatim e o Manual 
de Opera gao 

O Que e um disquete. Cuidados 
que voce deve ter ao manipular seu dis- 
quete. Como adquirir o modelo de dis- 
quete adequado ao seu equipamento. 
Estas sao algumas dicas que o usuario 
da Verbatim encontra no manual de 
orientagao ao usuario, elaborado pela 
empresa e que foi tambem distribuido na 
Feira de Informatica. 

Sem muitas novidades, a Verbatim 
colocou em exposigao disquetes de 5 
1/4 e 8 polegadas, alem de fitas magne- 
ticas. Seus produtos sao fabricados em 
Manaus e a Verbatim da cinco anos de 
garantia ao comprador. Mas, para isso, 
no entanto, e preciso ler com atengao ao 
Manual do Usuario. A Verbatim se res- 
ponsabiliza apenas pelos defeitos de fa- 
bricagao do disquete Datalife e nao 
pelos que sao consequencia de um ma- 
nuseio incorreto. F.F. 



Prolbgica: Perifericos 
e micro de 16 bits 

Foram varios os langamentos da 
Prologica na Feira de Informatica, tanto 
em equipamentos como em perifericos e 
softwares. Uma das novidades e a P500 
grafica, nova impressora da Prologica. 

A P500 grafica permite que um de- 
senho grafico de alta resolugao possa 
ser copiado pela impressora sem a alte- 
ragao da qualidade. As agulhas podem 
ser controladas uma a uma. Tern capaci- 
dade para fazer um programa para ge- 
rar qualquer tipo de grafico — de esta- 
tistico a area da engenharia — o que le- 
va vantagem em relagao as impressoras 
nao graficas. E acoplada, tanto a uma 
saida paralela quanto a uma saida serial, 
aos CP300, 400 e 500 e a qualquer micro 
compatfvel com a linha Apple. Possui 
disco rigido de 5, 10 ou 15 Mgbytes que 
permite um armazenamento maior sem 
a troca dos disquetes, o que e util prin- 
cipalmente para cadastros e arquivos 
grandes. A P500 e uma impressora pes- 
soal e pode ser usada ate com um su- 
per 700. 

O Sistema Profissional 16 e um ou- 
tro langamento da Prologica, que foi 
mostrado durante a lnformatica/84. O 
SP 16 aproveita os softwares hoje exis- 
tentes para o Sistema 700 e permite o 
aproveitamento dos aplicativos que ro- 
dam em 16 bits. O Sistema Profissional 
16 dispoe de um sistema operacional, o 
SO- 16, que permite rodar o que ha de 
mais atual no mercado e e compatfvel 
com o MS DOS. Possui um poderoso 
BASIC com recursos para geragao de 
graficos coloridos e sons. O equipa- 
mento aceita software para DOS 700, 
compativel com CP/M 2.2, atraves de 
uma placa de expansao. O Sistema Pro- 
fissional 16 pode atingir ate 320 kBytes 
de memoria RAM sem a necessidade de 
placas de expansao. F.F. 
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Monitor e terminal videotexto da Splice 



COMP-K 7 e o novo lanpamento da 
Splice que fez sucesso atraindo a aten- 
pao de muita gente, principalmente dos 
jovens, na Feira de Informatica. 0 
COMP-K 7 substitui os cartuchos con- 
vencionais do ATARI por simples fitas 
para gravador cassete. A partir de Janei- 
ro, cerca de 25 jogos ja estarao sendo 
comercializados em fitas K-7, em tercei- 
ra e quarta gerapoes. Entre os jogos: 
Rock, War Games, Buck Rogers, River 
Rade, Jaxcon, Tarzan e Destructor, 
alem de Gorf, Basquet, Space Panic, 
etc. 

A Splice mostrou tambem seu novo 
terminal videotexto em duas versoes: 
VR-100 e VI-100. 0 modelo VR-100 tern 
adaptador videotexto residencial, in- 
cluindo teclado remoto para ser ligado a 
um aparelho de TV em cores. E compa- 
tivel com o padrao Antiope (CEPT) e uti- 
liza 8 kBytes de memoria de programas 
EPROM, com reserva para expansoes e 
16 kBytes de memoria RAM que permi- 



te o armazenamento das ultimas paginas 
recebidas, ate 5 jogos de DRCS e versa- 
tilidade operacional. Conta com interfa- 
ce para impressora e interface para lei- 
tora de Cartoes Magneticos. 

0 VI-100 e uma unidade de video- 
texto institucional, composta com adap- 
tador, com video incorporado, incluin- 
do teclado. 0 VI- 100 tern saida RGB 
para televisao em cores; saida para gra- 
vacao e reprodupao em K-7; teclado 
com controle remoto infravermelho. 
Permite edipao em modo local com os 
recursos de movimentapao de cursos, 
escrita de texto na tela, manipulapao de 
atributos (tamanho da letra, cor de fun- 
do, sublinhamento, criapao de graficos 
utilizando mosaico separado ou junto e 
colocapao de grade na tela para visuali- 
zapao). 

Foi lancado ainda pela Splice o Spli- 
cevideo, monitor de video em duas ver- 
soes: o MVB-700, em preto e branco e o 
MVC-700, em cores. F.F. 



Atracoes americanas da H.P. 



A Hewllet- Packard trouxe novida- 
des para a Informatica/ 84 que deixaram 
seu estande completamente lotado du- 
rante os sete dias da Feira. Os micros 
HP li e HP 150, lanpados nos Estados 
Unidos, foram trazidos apenas para ex- 
posipao, ja que nao podem ser comer- 
cializados devido a Lei recem aprovada 
que protege a industria nacional. 

0 HP- 110, com impressora e dis- 
quete, e portatil e opera a bateria. Usa 
INTEL 80/86 de 16 bits; clock de 5.3 
Mhertz, possui memoria RAM de ate 
272 K e memoria ROM de 384 K. Na 
memoria ROM ja estao incluidos 4 pro- 
gramas: Lotus 1, 2, 3, que e um progra- 
ma tipo visicalc; memomaker (processa- 
dor de textos); emulador de terminais, 
podendo ser ligado a equipamentos 
maiores e o sistema operacional MS 
DOS. O HP 110 ja vem com um modem 
e sua tela e de cristal liquido de 80 co- 
lunas por 16 linhas. O micro aceita toda 



a linha de perifericos da HP. Para ele, no 
entanto, foram desenvolvidos 2 perife- 
ricos especificos: impressora a jato de 
tinta, operada a bateria com 150 CPS 
(2 K 1/2) e unidades de discos de 3 1/2 
polegadas com capacidade de armaze- 
namento de 710 K por disco. 

O HP 150 possui processador 80/ 
88 INTEL e clock 8 Mhertz, 256 K de me- 
moria RAM, podendo ser expandido ate 
640 K e MS DOS. O micro usa um visor 
de alta resolucao de 512/390 pontos. E 
sensivel ao toque, bastando ao usuario 
encostar o dedo na tela para acionar a 
maquina. Tanto o HP 150 como o HP 
110 sao compativeis com o IBM/ PC. 

Outro lanpamento da Hawleet 
Packard e o analisador de protocolo 
4951 A, que opera por unidade de fita 
K7. O 4951 A nao tern similar e serve 
principalmente para detectar problemas 
de comunicacao de dados nas linhas en- 
tre computadores e terminais. F.F. 



Novos Ql's apresentados pela Quartzil 



A Quartzil apresentou dois novos 
produtos na feira. O primeiro, e o micro- 
coletor de dados. Chamado de QI-200, o 
microcoletor e caracterizado pela em- 
presa como um microcomputador por- 
tatil destinado a aplicacoes como leitura 
de medidores de agua, luz e gas e tam- 
bem no apontamento de mao de obra. 
Suas caracteristicas tecnicas principals 
sao memoria RAM de 2 kBytes, memo- 
ria EPROM em 16 kBytes montados em 
cartuchos contendo, sistema operacio- 
nal, a aplicapao e os dados a serem cole- 
tados. O micro portatil pesa 1,2 kg, pos- 
sui 290 mm de comprimento e 140 mm 
de largura e pode ser alimentado com 4 



pilhas alcalinas de 1,5 V com opcao de 
eliminador de pilhas. 

Alem do microportatil, a Quartzil 
.apresentou o QI-900, um micro profis- 
sional destinado a aplicacoes comer- 
ciais como sistema de gestao de ven- 
das, sistemas de controle de financeiras. 

O QI-900 tern memoria de video 
com capacidade de gerar telas de 27 li- 
nhas de 100 caracteres, possue micro- 
processador "clock" de 4 MgHz, um 
conjunto de 158 instrucoes de maquina, 
compativeis com o 8080/8085, 19 regis- 
tradores e memoria de 64 ou 128 KBytes 
de RAM e 40 kBytes de memoria 
EPROM. A.L.A. 



Periferioos: uma presenga 
marcante na feira 

Uma das empresas que apresentou 
duas novidades em impressora foi a Eco- 
data. Em seu estande, a empresa mos- 
trou a EL-8000 — impressora hard-copy 
e a EL-8105 lanpada na feira. 

O maior destaque de seu estande 
foi a EL 8105 que tern velocidade de 6 
cps, cabepa de 9 X 7, grafica e possue 
resolupoes graficas de 62,7 ate 166,6. 
Segundo Reynaldo Joao Zemella, ge- 
rente de marketing, a EL-8105 sera co- 
mercializada com um prepo medio de 
140 ORTN e ja encontra-se disponivel 
com entrega prevista para 90 dias a par- 
tir da compra. 

A EL 8105 possue controle por mi- 
croprocessador, escrita bi-direcional, 
imprime em diversos idiomas e pode de- 
senhar, fazer graficos, reproduzir qual- 
quer imagem que o micro produzir em 
seu video, alem de outras caracteristi- 
cas. 

Ja a outra impressora apresentada 
nao e novidade, pois foi lancada em ju- 
Iho e esta sendo comercializada em tor- 
no de 160 ORTN. Suas caracteristicas 
principals e que ela possui duas interfa- 
ces (serial e paralela), utiliza papel de 
formato continuo, soltos ou bobinas. 
Possue 6 cps de velocidades, resolu- 
cao de 62,7 ate 166,6 alem de 103 dife- 
rentes tipos de escrita. A.L.A. 



Proteja seus olhos 

Consiga em sua TV de 12" o mesmo 
efeito dos monitores de vfdeo 
mais sofisticados. 




MICROTELA 



Microtela 6 um filtro anti-reflexo fa- 
cilmente adaptavel ao seu TV, composto 
por uma tela poliester montada sobre ba- 
se de acrflico, fomecido nas cores verde 
ou ambar para TV's preto e branco e in- 
color para TV colorida. 

O ofuscamento causado por quais- 
quer fontes de luz do ambiente refleti- 
das na tela e o cansago visual natural 
ap6$ um perfodo mais longo de utiliza- 
<?ao do seu micro sao totalmente elimi- 
nados. 

Microtela proporciona uma solupao 
barata e efetiva para o "problema" que 
est5 tirando o seu prazer de programar. 

Para maiores informapoes escreva para: 

Master Sting Ltda 

Caixa Postal 18708 

Sao Paulo - SP 
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EDITORIAL 



As maquinas pensam? 

0 tema e interessante e apaixonante. Tanto que nosja f alamos 
dele mais de uma vez (lembra-se do artigo “Podem as Maquinas 
pensar?"). 

0 assunto, longe de se esgotar, esta ainda no seu inlcio, pelo 
menos aqui no Brasil, e, por este motivo, optamos por dedicar este 
numero a Inteligencia Artificial. 

E nao sem razao. Notamos que no exterior o assunto ja 
entrou no dominio do publico, deixando ate de aparecer nas 
paginas da imprensa nao-especia/izada. Enquanto que, nas 
paginas da imprensa especializada, deixa-se de discutir 
possibi/idades e problemas de ordem fi/osofica, para passar-se a 
problemas de ordem pratica, como, por exempt o, ondea 
Inteligencia Artificial 6 necessaria, quais os 
ap/icativos disponlveis, etc. 

E o que temos no Brasil? A/guns 
artigos de ca rater informativo pub/icados em 
algumas revistas especializadas, a/gum trabalho de 
pesquisa em Universidades e Faculdades iso/adas, nem 
sempre divu/gado (me/hor: quase nunca), a/guma ficgao 
cientifica e sd. 

Diante disto, resolvemos fazer o que estava em nosso alcance: 
mostrar ao publico leitor da Microhobby que alguns principios da 
inteligencia artificial nao sao tao dificeis de compreender. Que um 
computador pessoal como o TK 2000 (ou mesmo do TK 83/85, 
conforme demonstramos no programa Carla, publicado na revista 12), 
pode ser "inteligente", rodando determinados programas. 

A Inteligencia Artificial esta ai, a sua f rente, na forma de um 
computador pessoal. Sera que ele "pensa "? A credi tamos que agora 
esta pergunta nao tern sentido, pelo menos tecnicamente fa/ando. 
Quer seu computador pense ou nao (e a resposta afirmativa 
depende apenas de como definimos "pensar"), ele e capaz de fazer 
algumas coisas que, as vezes, o deixam umpouco perp/exo, 
coisas que parecem estaralem daquilo que se espera dele. Isto 
depende apenas da habilidade do programador que "ensina" 
certos "truques" para maquina; truques estes que podem ser, ou 
nao, considerados programas de inteligencia artificial. 0 que 
importa e a criatividade que, somada a tecnica e a honestidade 
de propositos, so pode trazer beneficios. 
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CARTAS 




Xadrez e o TK 85 

Meu hobby preferido e jogar Xa- 
drez e, em 1979, fui campeao do torneio 
da Prefeitura de Pogos de Caldas. Em 
novembro de 1983 tomei conhecimento 
do programa TKadrez II e comprei um 
TK 85, com 16 k, para observar como os 
micros jogam xadrez. A curiosidade em 
saber como o programa jogava me fez 
interessar-me pela Informatica e, a partir 
de maio de 1984, comprei varios livros 
sobre BASIC e Assembly. Agora ja co- 
mego a por as "manguinhas de fora". 

Atualmente, continuo estudando 
Assembly com o objetivo de entender o 
TKadrez II, que ate agora continua inde- 
cifravel para mim, apesar de ja ter con- 
seguido melhorar os letreiros. 

Agora, se voces me permitirem al- 
gumas criticas sobre a nossa Micro- 
hobby, a partir da n°. 10 observei que em 
cima do titulo da revista nao vem mais a 
frase: "A revista dos usuarios do TK". 
E venho observando que a Microhobby 
esta se diversificando, abrangendo in- 
formagoes para varias linhas de micros. 
Essa e uma diretriz que coloca a Micro- 
hobby ao lado das varias revistas exis- 
tentes no mercado e isso faz com que os 
assinantes se desinteressem em assina- 
la, jaque sera mais eficiente folhear va- 
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rias revistas antes de optar pela qual vai 
comprar, pois todas elas dedicam gran- 
de parte editorial aos usuarios do TK. 
Neste momento, estou folheando a Mi- 
crohobby n? 12 com um pouco de de- 
cepgao, porque tenho em maos uma 
bela revista, mas com fraco conteudo. 

(. . .) 

Como meu unico objetivo e ajudar a 
construir uma Microhobby cada vez 
mais forte, aqui vaos algumas suges- 
toes: 

a) A segao Dicas e muito boa e po- 
deria ser aumentada. 

b) Programas do tipo "ferramen- 
ta", como o Merge, sao bem recebidos. 

c) Pequenas modificagoes eletro 
eletronicas, tais como: inversao de vi- 
deo, alimentagao do TK com bateria de 
carro, etc., tambem sao bem recebidas. 

d) 0 curso de Assembly, <}ue e um 
resumo do livro Linguagem de Maquina 
para o TK, de Flavio Rossini, deveria ser 
substituido por artigos e programas em 
Assembly. 

e) 0 Curso de BASIC deve conti- 
nuar, porque as aulas estao mais ao 
alcance do grande publico. 

f) Analise das rotinas da ROM do 
TK s3o de grande interesse. 0 ideal se- 
ria a publicagao de, pelo menos, uma 
rotina analisada por numero e, com o 



tempo, teriamos um mapa completo da 
ROM do TK. 

Marco Daniel de Barr os Accio/y 

Pogos de Caldas — MG 



Prezado Marcos , 

0 tema principal desta revista e a 
Inte/igencia Artificial l assunto de grande 
interesse aos nossos lei tores. Nessa 
ciencia estao os principios que nortea- 
ram a construgao de varios programas 
jogadores de xadrez , entre eles o TK- 
drez II, fabricado pela Microsoft. Pro- 
gramas como o Gabriela , Carla, Damas, 
pub/icados na Microhobby, sao bons 
exemp/os desta tecnica em agao e o aju- 
darao a entender o que se passa em seu 
computador quando voce jogar xadrez 
com e/e. 

Voce acha que um provavel assi- 
nante nao optar a pela Microhobby por 
el a nao ser inteiramente voltada para o 
TK e compativeis. Nossa experiencia 
demonstra o contrario: o numero de re- 
no vagoes de assinaturas foi muito alto e 
o de novas assinaturas tambdm. Alem 
disso nossa presenga nas bancas tern 
si do bastante efetiva, crescendo a cada 
dia. 



A revista que voce disse estar fraca 
tinha um interessante programa que po- 
deria ensinar-lhe alguma coisa sobre 
inte/igencia artificial e, porta nto, com- 
preender mais sobre o TKadrez II. Tra- 
ta-se do programa Carla que nos consu- 
miu muito tempo de preparo. Este pro- 
grama Simula um dialogo inte/igente en- 
tre o psicana/ista (micro) e seu paciente 
(usuario), e o micro utilizado foi um 
TK85. 

Nesta edigao, pub/icamos outro 
programa que "aprende" a jogar: e o 
Gabriela, que foi desenvo/vido para TK 
2000, mas que tern sua estrutura minu- 
ciosamente descrita e permite ao leitor 
um me/hor entendimento de como se 
faz este tipo de programa. 

Melhoria 

Sou assinante desta revista e, ape- 
sar de o ser ha muito pouco tempo, 
tenho acompanhado a sua publicapao 
desde o primeiro numero e percebe-se 
durante a sua tragetoria, um aumento 
indiscutivel do seu conteudo e, conse- 
quentemente, do nivel da revista. 

0 tratamento que voces passaram a 
dar a outras logicas, que nao a dos com- 
pativeis com o TK 85, eu acho valido. 
Apesar de possuir um TK-85, entendo 
ser necessario o conhecimento de 
outras linguagens, para aumentar nossa 
integrapcio neste universo tao vasto que 
e o da Informatica. 



Tambem a inclusao de novas 
secoes e o aprimoramento das ja exis- 
tentes contribuiram para uma melhor 
qualidade da revista. Em particular apho 
muito interessante as sepoes "Dissecan- 
do" e "Vice-Versa"; a primeira pela 
excelente qualidade e a segunda pela 
utilidade, podendo ser usada como fer- 
ramenta para nos auxiliar na conversao 
de programas de uma linguagem para 
outra que melhor nos convenha. 

A variedade e a qualidade dos pro- 
gramas tern melhorado muito, indo des- 
de aplicativos como "Dinheiro no Tem- 
po" ate os de lazer, como o excelente 
Carla. 

Isso prova o esforpo e a dedicapao 
de voces no sentido de elevar o nivel da 
revista "Microhobby" o que, acredito, 
voces podem conseguir mais. 

Mesmo assim, gostaria de fazer 
algumas sugestoes e observapoes que 
me parecem viaveis no momento: 

— Incluir mais vezes as Tradupoes para 
o BASIC TK; 

— Continuar com as dicas: elas sao uti- 
lissimas. 

— Incluir, sempre que possivel, nas se- 
coes "Por dentro do Apple" e "Os Oi- 
tenta", listagens com programas equi- 
valentes para o TK 83/85 e uma compa- 
rapao entre elas. 



Jose Eduardo Zanardi 

Sao Carlos — SP 



Prezado Carlos , 

Agradecemos as suas sugestoes, 
bem como os e/ogios. As segoes que 
voce indicou aparecerao sempre que se 
fizerem necessarias e, se o interesse dos 
leitores por elas for significativo, fare- 
mos o possivel para tor na- las regular. 

Carla 

Escrevo para congratula-los pelo 
excelente software desenvolvido na re- 
vista Microhobby. Refiro-me, especial- 
mente, ao programa Carla, publicado na 
revista numero 12, que "rodei" em um 
TK-85 de um amigo. Mas sou possuidor 
de um Apple e nao consegui fazer o 
mesmo rodar no meu computador. 

Benedito Campos Lima Junior 

Sao Luiz — MA 

Prezado Benedito, 

0 programa Carla, da forma como 
foi apresentado, utiliza-se das fungoes 
de "fatiamento de strings " do TK 85, 
que tern uma forma particular, diferente 
das do Apple ou do TRS-80. Na revista 
numero 7, mostramos como isto ocorre, 
no artigo " Um Editor de Cartas 

De qua/quer forma, vamos estudar 
a possibilidade de escrever uma adap- 
tagao para o Apple e para o TK 2000, ou 
para o TRS-80. 



PROTEJA SEU 
MICRO 




CONTRA: 

- PICOS DE MOLT AG EM 

- TRANSIENTES DE TENSAO 

- RUIDO ELETRICO 

- INTERFERENCE: 

RADIO FREQUENCE (RF) 

POT EN CIA: ATINGE ATE 1,5 KVA 
TENSAO: 220V ou 110V 



ZENTRANX 

eletrOnica, industria e comercio ltda. 

NO BREAK ESTABILIZADORES DE TENSAO 

Av. Vitor Manzini, 410/414 
CEP 04745 — Santo Amaro — S. Paulo 
Tels.: (011) 522-2159 e 548-0651 




LANpAMENTO 




Terminal com 
teclado profissional 
tecnologia ITT 
compativel com toda 
linha Sinclair NE e TK. 
Teclado com feed-back 
t&ctil com todas as 
fungdes gravadas na 
prdpria tecla. Caixa em ABS expandido 6 mm de 
espessura pronta para receber seu micro 
computador com todas as interligagdes instaladas. 
Acompanha manual para montagem com opgdes 
de fixagao da fonte internamente ou usando 
externamente. 

Saidas: Expansao memdria/impressora 
Fonte externa ou interna 

Gravag§o EAR/MIC 
Chave Liga/Desliga 
Chave 110/220 Vac 
Joystick 



INTER-COL IND. E COM. LTDA. 

Depto. Vendas • Av. Alda. 805 - Diadema (Centro) 
tone: 456.3011 




Linha de raurica^ao: 

Chaves comutadoras 

feclas e teclados semi profissionais 

Teclas e teclados profissionais 
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Caro Claudio, 




INKEY$ no TK 2000 

(. . .) Sou possuidor de um TK2000 
e queria saber como implementar a fun- 
cao INKEY$ no mesmo. 

Fawzi Mikhail Abd el Sayed 
Volta Redonda — RJ 



Caro Fawzi, 

Informamos a voce, bem como a 
todos que nos tern escrito sobre o IN- 
KEY$ no TK 2000, que esta pergunta foi 
respondida em duas oportunidades: 
uma na revista 13, na segao "Desgri/an- 
do ", onde resolvemos o probiema com 
uma pequena sub- rod na em lingua gem 
de maquina ; outra na revista 15, na se- 
gao "Dicas", onde um leitor descobriu o 
enderego PEEK (39) que fornece um va- 
lor diferente para cada tec/a pressiona- 
da, e mb ora diferente do codigo ASCII. 
Uma pequena conversao resolve o pro- 
biema. 



TK 2000 x Apple 

Inicialmente gostaria de congratu- 
la-los pelos otimos temperos dessa deli- 
ciosa revista Microhobby. 

Desejaria saber, tambem, se e pos- 
sivel, para nos leitores, alterar alguns 
programas publicados na Segao "Por 
Dentro do Apple" de forma que possam 
ser rodados num TK 2000 pois, segun- 
do o manual e tambem um artigo mos- 
trando as diferengas entre o Apple e o 
TK 2000, publicado na Microhobby n°. 
10, existem basicamente tres comandos 
(IN, PR, FLASH) que sao executados 
num Apple e nao no TK 2000. Todavia, 
num programa recente da Segao "Por 
Dentro do Apple" (Disco Voador, Mi- 
crohobby n? 12), encontrei dois coman- 
dos (SCRN e POP) que nao existem no 
TK 2000. 

Em suma, como seria possivel 
adaptar os programas da Segao "Por 
Dentro. do Apple" para suplementar a 
escassa safra de programas para o TK 
2000 ? 

Ed gar d da Veiga Lion Neto 
Sao Paulo — SP 




Caro Edgard, 

As instrugoes que voce aponta co- 
mo sendo do Apple e nao do TK 2000, 
na realidade, pertencem ao conjunto de 
instrugoes de ambos os computadores. 

A instrugao SCRIM fornece a cor de 
um determinado ponto na tela e a ins- 
trugao POP faz com que uma sub-roti- 
na, ao inves de retornar ao programa 
principal, execute a proxima sub-rotina, 
ou linhas de programa que /he sao pos- 
teriores. 

As dicas para adaptar esses progra- 
mas serao fornecidas pau/atinamente, a 
medida que forem surgindo oportunida- 
de para isso. No momento, aconse/ha- 
mos a tomar cuidado com PEEKs, PO- 
KES e programas que envoi vam grafi- 
cos. 

Por outro /ado, os programas para 
o TK 2000 serao cada vez mais frequen- 
tes em nosas paginas. 



TK 2000 x Apple (II) 

Solicito que a Microhobby me auxi- 
lie esclarecendo as seguintes duvidas 
com relagSo ao TK 2000: 

1) Li na Microhobby n? 10 que, pa- 
ra programas com mais de 6 kBytes, de- 
veremos usar a segunda pagina de vi- 
deo. Acontece que, antes de ler tgl arti- 
go, havia digitado um programa com 12 
k sem apresentar nenhum probiema. 0 
que aconteceu? 

2) Quanto aos jogos da Microsoft 
que possuo, todos com mais de 6 k, de- 
vo chama-los em qual pagina. 

3) Considerando que o MT permi- 
te o acesso a 38 k de RAM, como pode- 
rei digitar programas como o apresenta- 
do na colegao "Enciclopedia Pratica de 
Informatica", Minidata, para computa- 
dores de 64 k, e indica o TK 2000 como 
um dos que aceitam tal programa? 

Claudio C. Alves de Moura 
Sao Paulo — SP 



O artigo que pub/icamos na Micro- 
hobby n? 10 tratava de compatibilizaqao 
entre TK 2000 e Apple e os conse/hos 
dados eram re/ativos a adaptaqao de 
programas de uma /inha para outra. De 
qualquer forma, programas que ocupa- 
rem mais de 6 kBytes, com te/as grafi- 
cas, devem sofrer as modificagoes cita- 
das. Quanto aos jogos da Microsoft ou 
de qualquer outro fabricante, voce nao 
precisa preocupar-se em chama-los na 
pagina adequada, uma vez que is to esta 
"embutido" no proprio software. Em re- 
lag a o ao programa " Minidata " nada po- 
demos responder, uma vez que nao o 
conhecemos. Sugiro que voce escreva 
para a Editora Abril, procurando so/u- 
cionar seu probiema. 



Explorando o TK-2000 

Sou medico e, para usar um micro- 
computador no consultbrio, optei pelo 
TK 2000. Consegui fazer varios progra- 
mas (o manual de instrugao 6 muito cla- 
ro, auxiliando muito, pois mesmo sem 
curso de BASIC consegui fazer varios 
programas), mas tive dificuldade de gra- 
var dados em fita (como DSAVE e 
DLOAD do TK 2000) . Sei que isso e pos- 
sivel atraves de uma sub-rotina em lin- 
guagem de maquina, que seria coman- 
dada pelo BASIC (. . .) mas como te- 
nho o micro s6 desde junho, e n3o te- 
nho nenhuma experiencia de programa- 
gao, tentei e nSo consegui. Assim, ape- 
lo para "Explorando o TK 2000" para 
conseguira solugSo. 

(, . .) 

E indiscutivel que a Microhobby e a 
revista ideal para apoiar os possuidores 
de TK 2000 e a segio "Explorando o TK 
2000" e uma magnifica id6ia. Como a si- 
milaridade entre o TK 2000 e grande, su- 
geriria que, no "Por Dentro do Apple" 
viesse tamb6m uma indicagao de como 
alterar esses programas para "rodar" no 
TK 2000. 

Joao Jose de Araujo Moura Fi/ho 
Rio de Janeiro — RJ 



Prezado Joao, 

Em primeiro lugar agradecemos, 
em nome do professor Tucci e seus co- 
laboradores, os elogios que faz a segao 
" Explorando o TK 2000". Quanto a sua 
pergunda, informamos que existem 
duas instrugoes especificas no TK 2000 
destinadas a manipu/agao de dados em 
fitas: STORE e RECALL, que estao des- 
critas no manual do TK 2000 na pagina 
113. 

Estas instrugoes sao especificas pa- 
ra gravagao ou feitura de matrizes nu- 
mericas. 

Como se trata de matrizes nume- 
ricas, el as devem ter si do pre-dimencio- 
nadas ( pe/a instrugao DIM ) antes da gra- 
vagao e antes da leitura. 
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A instrugao STORE armazena em 
fita o conteudo de uma matriz nume- 
rica. S upon ha que voce ten ha uma se- 
rie de dados a ser armazenados, por 
exemplo, 200 humeros quaisquer. Voce 
podera , por exemplo , colocar estes va- 
lores numa matriz de 10 x 20 numeros. 
Assim, no inicio do programa, para evi- 
tar redimencionamento, co/oque a se- 
guinte Unha: 

10 DIM Ai 10,20) 

A matriz podera ter qualquer no me , 
e quaisquer dimensoes, desde que com- 
porte o numero de dados que voce de- 
seja armazenar. 

Em at gum ponto do programa , voce 
deve carregar os dados na matriz A. 

No final do programa ou onde juT 
gar conveniente, acrescente a seguinte 
Unha: 

nnn STORE A 

As letras "n" indicam que pode ser 
um numero qualquer de tin ha. Eviden- 
temente, o gravador d ever a estar ro- 
dando no modo "REC". Voce podera 
incrementar esta operagao usando o co- 



ma ndo MOTOR. A maneira correta de 
utiliza-lo esta descrita na pagina 1 14 do 
manual do TK 2000. A sua fungao e Ugar 
e desligar um dos gravadores por meio 
de sua entrada REMOTE. Assim >, voce 
podera deixar o gravador no modo 
" REC ", conectar o cabo apropriado na 
entrada REMOTE e comandar a sua / i ga- 
ga o por meio de MOTOR 1, se o REMO- 
TE do gravador estiver conectado a en- 
trada A, ou M0T0R3 se o REMOTE do 
gravador estiver conectado na entrada 
B. E necessario o uso de uma pausa de- 
vido a inercia do circuito. Por exemplo , 
supondo que a instrugao STORE esta na 
Unha 100 f acrescente as seguintes ins- 
trugoes: 

95M0T0R1 

96 FOR I = 1 TO 100: NEXT! 

100 STORE A 

101 MOTORO 

102 FOR / = ; TO 100: NEXT I 

A Unha 95 Uga o gravador A, a Unha 
96 executa um loop vazio para permitir 
uma pausa , a Unha 100 car r eg a a matriz 
em fita , a Unha 101 desliga o gravador A 
(se estivessemos usando o gravador B, 
deveriamos usar MOTOR 2 ) e a Unha 102 
executa um loop vazio, originando uma 



pausa antes da conti nuagao do progra- 
ma. 

A instrugao RECALL le uma matriz 
gravada em fita, previamente gravada 
por uma instrugao STORE. As dimen- 
soes deverao ser as mesmas, mas o no- 
me da matriz podera ser outro. Se voce, 
por exemplo, desejar recuperar a matriz 
gravada pela instrugao STORE do nosso 
exemplo, podera faze-lo da seguinte 
forma: 

a) dimensionar a matriz no comeg o 
do programa com as mesmas dimen- 
soes do programa anterior (ou, na me- 
Ihor das hipoteses, com a ultima das 
dimensoes maior que a do programa 
anterior): 

10 DIM D( 10,20) 

b) carregar, da fita, a matriz no 
computador por meio da instrugao 
RECALL, estando o gravador funcio- 
nando no mo'do " PLAY 100 RECALL 
D. 

c) dar prosseguimento ao progra- 
ma. 

Da mesma forma que utilizamos no 
programa anterior, poderemos nos uti- 
Uzar do coma ndo MOTOR, facilitando o 
trabalho com a fita. 




FAQA DE SEU k 
MICRO | 
“SINCLAIR” ^ 
UM 

PROFISSIONAL 



De-lhe um 



Vantagens: 

□ Maior dinamismo na entrada de dados r 

□ Vida util maior que 2 milhdes de operagoes 

□ Um teclado profissional com switches individuals e acionamento mecanico. 

□ Gabinete em Fiber-Glass que suporta video de 12 polegadas e acondiciona micro, 
expansao e fonte. 



Speed Eletro Eletronica Ltda. - Rua I (i) n.° 395 - Bernardo Monteiro - 32.000 - Contagem - MG - Caixa Postal 1036 - Tel: (031) 463-3171 - 351-1887 
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Opera eoes Aritmeticas no TK 83/85 
usando o Assembly 



Bernhard Wolfgang Schon 




A maioria dos calculos necessarios em rotinas escritas 
em linguagem de maquina sSo feitas usando simplesmente os 
registradores disponfveis. Desta forma, com apenas um regis- 
trador, podemos manipular numeros entre 0 e 255. Aprovei- 
tando o recurso da CPU, interligando dois registradores para 
formar um par, temos ef possibilidade de realizar calculos com 
valores entre 0 e 65535. 

Colocando o resultado no par BC, podemos imprimir 
este numero usando o comando: 

PRINT USR (enderego) 
ou 

LET A = USR (enderego) seguidode PRINT A 



0 exemplo da figura 1 demonstra como podemos somar dois 
numeros. 



Figura 1 








16514 


LD HL, (numero) 


210000 


; define os valores 




LD BC, (numero) 


0100 00 






ADD HL, BC 


09 


; soma os numeros 




LD B,H 


44 


; transfereo resultado 








para BC 




LD C,L 


4D 






RET 


C9 


; retorna ao BASIC 



Isto demonstra que, colocando valores relativamente 
pequenos em HL e BC, obtemos o resultado na tela com o 
comando PRINT USR 16514. 0 resultado corresponde sempre 
ao valor correto quando este n3o ultrapassar o limite m^ximo 
65535 (figura 2). 



Figura 2 








Exemplo: somar 719 com 9310 








16514 LD HL, -1-719 


21 


CF 


02 


LD BC, +9310 


01 


5E 


24 


ADD HL,BC 


09 






LD B,H 


44 






LD C,L 


4D 






RET 


C9 







dara ap6s PRINT USR 16514 o valor 10029 



Figura 3 








Exemplo: somar 38510 com 40000 








16514 LDHL, +38510 


21 


6E 


96 


LD BC, +40000 


01 


40 


9C 


ADD HL,BC 


09 






LD B,H 


44 






LD C,L 


4D 






RET 


C9 







dara ap6s PRINT USR 16514 o valor 12974 (??). 



Na figura 3 temos um exemplo pratico do que foi fa- 
lado anteriormente. Como o resultado ultrapassou o valor 
65535, o numero na tela representa a diferenga entre o resul- 
tado real menos 65536 (o numero 65536 sera impresso como 
0 ). 

Assim, temos a seguinte sequbncia: 

resultado correto valor em BC 

65535 65535 

65536 0 

65537 1 

78510 12974 

ou ainda, expressando, esta "divergbncia" do resultado numa 
fbrmula matematica: Valor em BC - resultado correto I NT 
(resultado correto/ 65536) *65536. 

0 caso 6 semelhante subtraindo, multiplicand© ou 
dividindo os numeros. Quanto a subtragio, as rotinas escri- 
tas em linguagem de maquina nSo sao complicadas, pois 
temos a nossa disposigSo os mnembnicos. 

SUB (subtragSo normal) 

e SBC (subtragSo em observagSo do Carry-Flag) 



A multiplicagSo ja complica um pouco mais, pois em- 
pregando apenas um mnembnico podemos apenas realizar 
multiplicagbes na base de 2 (*2, *4, *8 etc.). Este mnemb- 
nico a o SLA A(shift left), que desloca todos os bits do acu- 
mulador A uma casa para a esquerda, que corresponde ao 
dobro do valor’inicial: 

A = 3 00000011 (valor inicial) 

apbs SLA A 00000110 (o valor agora b 6) 
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Assim, se quisermos multiplicar o valor 3 por 8, pode- 
mos escrever a seguinte rotina: 

16514 LD A, +3 3E03 ; valor inicial 

SLA A CB 27 ; multiplica por 2 (3*2 = 6) 



Ap6s PRINT USR 16514 teremos o resultado 8, en- 
quanto o resultado correto seria 8,5. 0 motivo e evidente, pois 
"perdemos" o ultimo bit ap6s a instrupSo SRA A: 
antes: A = 17 00010001 

APOSSRAA 000010001= 8) 



SLA A CB 27 ; multiplica por 2 (6*2= 12) 

SLA A CB 27 ; multiplica por 2 (12*2 = 24) 

e, para imprimir o resultado na tela, teremos ainda que car- 
regar o par BC com este resultado: 

LD B,0 06 00 

LD C,A 4F 

RET C9 

edigitar PRINT USR 16514. 

Se o valor no acumulador A, ap6s a instrupao SLA, ul- 
trapassar o valor 255, teremos novamente resultados irreais: 
Ex.: A = 201 11001001 

ap6s SLA A 10010010 ( = 146) 

Tamb6m aqui podemos prever o resultado, aplicando 
a seguinte fbrmula: Valor em A = resultado correto /NT ( re- 
sultado correto/ 256) *256 

Para realizar multiplicapOes diferentes aos de base 2, 
podemos usar somas repetidas ate chegar ao resultado final: 
Exemplo: multiplicar 83 por 7 



16514 LD 


HL,0 


21 0000 


; define o par 
HL — 0 


LD 


DE, + 83 


11 5300 


; define o par DE 
com 83 


LD 


B,7 


0607 


; B controla a 
quantidade das 
somas 


ADD 


HL,DE 


19 


; soma DEao HL 


DJNZ 




10 FD 


; repete a soma ate 
completar 7 loops 


LD B,H 


44 


44 


; carrega o resul- 
tado de HL para 
BC 


LD C,L 




4D 




RET 




C9 





Ap6s o comando PRINT USR 16514, teremos o resul- 
tado 581 na tela. Deve-se observar tambSm aqui o limite m3- 
ximo trapado pelo numero 65535. 

Da mesma maneira podemos, dentro dos limites ja co- 
nhecidos, dividir numeros usando o Assembly. Semelhante ao 
SLA para a multiplicapao, temos para a divisao o SRA A, que 
desloca todos os bits do acumulador A uma casa para a direi- 
ta, dividindo, desta maneira, o numero por 2 (figura 4). 



Podemos concluir, que somente numeros pares po- 
dem ser divididos usando o SRA, pois n3o ha condipOes de 
apresentar as frapOes. Expressando tamb6m esta deficiencia 
numa fbrmula matematica, temos: 



valor no registrador = /NT ( resultado correto) 



Continuando com estes recursos, percebemos logo os 
limites dos mnembnicos disponfveis, principalmente quando 
queremos realizar calculos mais complexos, como extrair rai- 
zes, logaritmos ou outros calculos no campo da trigonome- 
tria. Voce seria, por exemplo, capaz de desenvolver uma roti- 
na em linguagem de maquina, que eleva o valor 3,1506 na 
potencia de 5,0113? 

Para estes casos, esta a nossa disposipSo o monitor do 
nosso micro, que contem varias sub-rotinas especificas, faci- 
litando calculos complexos. Estas sub-rotinas ocupam cerca 
de 3 kBytes dos 8 kBytes originais, e sao acessadas com a 
instrup2o RST28. 

Este mnembnico RST28 significa "restart at 28", que 
leva a CPU a executar a rotina localizada neste enderepo. E 
a inicializapSo para calculos com ponto flutuante, e cada ins- 
trupSo ap6s RST28 sera interpretada como uma funpao, e n§o 
mais como um mnembnico usual. A unica instrup5o capaz de 
indicar ao micro que terminaram os calculos em ponto flu- 
tuante e a instrupao FIM (valor 34 em hexadecimal). Temos, 
portanto, a seguinte configurapao usando RST28: 



Exemplo: A = 16 


00010000 




ap6s SRA A 


00001000 (valor = 


8) 


A = 78 


01001110 




ap6s SRA A 


00100111 (valor = 


39) 



Podemos observar que, neste caso, nab precisamos 
nos preocupar com o valor maximo permitido (255), pois o re- 
sultado sempre sera menor do que o numero inicial. Toda- 
via, nao podia deixar de ser, este metodo apresenta uma ou- 
tra desvantagem nao menos despresivel. 



Figura 5 








Exemplo: dividir 17 por 2 




16514 


LD A, + 17 


3E11 


define o valor inicial 




SRA A 


CB2F 


; divide por 2 




LB B,0 


06 00 


; passa o resultado para BC 




LD C,A 


4F 




RET 


C9 


; volta ao BASIC 



LANCAMENTO 




Voce ja imaginou a importancia dos disquetes para o seu 

micro? 

Agora no mercado o mais recente sistema de arquivamento 

para disquetes 5 1/4" para seu micro. 

— Protege o disquete do po, sol, umidade, contato, etc. 

— Facilidade no manuseio e ordenacao de seus programas e 
jogos. 

— Possui indice interno (para duas faces) para que voce possa 
classificar e localizar seus programas. 

— Possui visor/ indice externo para ordenacao e localizagao 
do seu conjunto de disquetes. 

— Com capacidade para lOunidades (5 1/4"). 

— Bonito, leve, resistente, pratico e de facil locomocao. 



> 



A venda nas me/hores lojas do ramo. 



Fisco 



FORMULARIOS INTEGRA DOS SISTEMAS 
CONSULTORIA E ORGANIZApAO LTDA. 

R. Ibirapitanga, 216 — V. Pires 
Santo Andre - SP - CEP 09000 
Fones: 440-2674/440-5412/412-1408 
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(rotina Assembly) \ 

RST28 / 

\ 

(instrugbesdecalculo ) ) aqui sao feitos os calculos 

i* \ 

(rotina Assembly) I 

i 

Antes, porem, de entrar na rotina de calculos de ponto 
flutuante e necessario definir os valores iniciais, com os 
quais se quer efetuar a operagao matematica. 

0 procedimento para esta preparagao e o seguinte: 

1 . carregar o primeiro numero no par BC 

2. chamar a sub- rotina em 1520 

3. carregar o segundo numero em BC 

4. chamar novamente a sub-rotina em 1520 

5. iniciar os calculos com o RST 28 

6. programar as fungbes desejadas 

7. "fechar" os calculos em 34 

8. continuar com o programa normal 

A rotina no enderego 1520 em hexadecimal transfor- 
ma o valor em BC para uma configuragao de 5 bytes, dife- 
rente da que n6s ja conhecemos. Esta transformagao e ne- 
cessaria para calculos em ponto flutuante e, por hora, nao ha 
necessidade de nos preocuparmos como esta transformagao e 
feita. 

Se quisermos colocar numeros menores do que 256 no 
stack do calculador, podemos tambSm usar o acumulador A 
ao inves do par BC, s6 que neste caso deve ser chamada a 
sub-rotina do enderego 151D. Na verdade, esta ultima rotina 
nada mais faz do que carregar o registrador B com 0 e o re- 
gistrador C com o valor contido em A. 



Sabendo que para a adigao temos o cbdigo 0F, po- 
demos somar os numeros 31000 e 7112 da maneira mostrada 
na figura 6: 



Figura 6 

16514 LDBC, +31000 


01 18 79 


; define o primeiro numero 


CALL 1520 


CD 20 15 ; coloca o numero no 






stack do calculador 


LD BC, +7112 


0C81B 


; define o segundo 
numero 


CALL 1520 


CD 20 15 ; coloca o numero no 






"stack" do calculador 


RST28 


EF 


; prepara o calculador 


Adigao 


0F 


; soma os dois numeros 


FIM 


34 


; final dos calculos 



Nesta altura, o resultado ja se encontra no topo do 
stack do calculador, porem ainda em forma de 5 bytes. Deve- 
mos retirar este valor do stack pois, caso contrario, o micro 
entra "no ar" voltando ao BASIC. Uma das maneiras de colo- 
car o resultado no par BC e chamando simplesmente a sub- 
rotina pr6pria para este fim, localizada no enderego 0EA7. 
Assim, a rotina acima deve continuar com as instrugbes mos- 
tradas na figura 7. 



Figura 7 
CALL 0EA7 


CD A7 0E 


; transfere o resultado para o parBC 


RET 


C9 


; volta ao BASIC 



Apos PRINT USR 16514, teremos novamente na tela, 
exatamente como aconteceu anteriormente. Por enquanto, 
nao ha vantagem aparente entre esta maneira, usando RST28, 
e o metodo convencional ja descrito. Vamos ver como o pro- 
grama reage quando o resultado ultrapassa o valor 65535, 
somando, por exemplo, 40000 com 60000 (figura 8). 



Figura 8 16514 LD BC, + 40000 


01 40 9C 


CALL 1520 


CD 20 15 


LDBC, + 60000 


01 60 EA 


CALL 1520 


CD 20 15 


RST28 


EF 


Adigao 


0F 


FIM 


34 


CALL 0EA7 


CD A7 0E 


RET 


C9 



Dando PRINT USR 16514, percebemos que o progra- 
ma para com a indicagao de erro B no canto inferior esquerdo 
da tela, demonstrando que houve um calculo fora do limite 
permitido. Esta e a diferenga fundamental entre o RST28 e o 
metodo comum, pois, toda vez que o resultado se tornar ne- 
gativo, ou ultrapassar o valor 65535, a rotina retorna ao BASIC 
durante a execugao da sub-rotina em 0EA7. 

0 resultado real, no caso 100000, foi realmente encon- 
trado e fica no topo do stack do calculador, porem, ainda em 
forma de 5 bytes. A questao 6: o que fazer para "ler" o resul- 
tado sem correr o risco de parar o programa. 

A solugao e mais simples do que se imagina. Basta 
substituir a sub-rotina em 0BF5 pela sub-rotina no enderego 
0B55. Esta ultima rotina imprime o numero localizado no topo 
do stack do calculador na tela, independente do seu valor e 
grandeza. 

Alteramos, portanto, a rotina acima a partir da instru- 
gao "FIM" conforme segue: 

FIM 34 

CALL 0B55 CD55 0B 

RET C9 

0 comando certo agora e RAND USR 16514 , e nao 
mais PRINT USR 16514, pois deixamos de usar o par BC para 
imprimir o resultado na tela. E para a nossa satisfagao, apa- 
rece agora, finalmente, o resultado correto na tela! 

Criando coragem, vamos ver se o programa e real- 
mente capaz de imprimir qualquer numero (figura 9). 

Figura 9 

Ex: subtrair de 5 o valor 13 
LDA, +5 3E05 
CALL 151D CD ID 15 
LDA, + 13 3E0D 
CALL 151D CD ID 15 
RST28 EF 
Subtracao 03 
FIM 34 

CALL 0B55 CD55 0B 
RET C9 



que leva realmente ao resultado —8 apos RAND USR 16514, 
ou ainda, provocando resultados fracionados, dividindo, por 
exemplo, 7 por 4 (figura 10). 



Figura 10 






LDBC, + 7 


01 07 00 




CALL 1520 


CD 20 15 




LD BC, +4 


01 04 00 




CALL 1520 


CD 20 15 




RST28 


EF 




Divisao 


05 




FIM 


34 




CALL 0B55 


CD55 0B 




RET 


C9 


; seguido de RAND 
USR 16514 



Na tabela I, vemos uma listagem das fungbes dispo- 
niveis apbs RST28. 



Tabela 1 


Fungao 


Codigo 


Fungao 


Codigo 


adigao 


0F 


subtracao 


03 


MULTIPLICACAO 


04 


divisao 


05 


EXP 


23 


ABS 


27 


SQR 


25 


SEN 


1C 


COS 


ID 


TAN 


IE 


ASN 


IF 


ACS 


20 


ATN 


21 


SGN 


26 


USR 


29 


VAL 


1 A 


CODE 


19 


PEEK 


28 


LN 


22 


INT 


24 


STR$ 


2A 


CHR$ 


2B 


NOT 


2C 


OR 


07 


potenciagao 


06 


deletar 


02 


trocar 


01 


duplicar 


2D 
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Temos ainda uma area reservada para calculos em 
ponto flutuante, onde podem ser guardados ate seis numeros* 
de 5 Bytes cada. Esta area abrange 30 posicoes. (tabela II) 



Figure 12 



Tabela II 


Enderego 


Conteudo 


16477 (405D) 


1? numero 


16482(4062) 


2? numero 


16487 (4067) 


3? numero 


16492(4060 


4? numero 


16497(4071) 


b° numero 


16502 (4076) 


6? numero 



As instrucbes necessarias para colocar, ou retirar ; os valores 
nesta area sao simples: 

C0 - Coloca o ultimo resultado na membria 0 
Cl - Coloca o ultimo resultado na membria 1 
C2 - Coloca o ultimo resultado na membria 2 
C3 - Coloca o ultimo resultado na membria 3 
C4 - Coloca o ultimo resultado na membria 4 
C5 - Coloca o ultimo resultado na membria 5 



e ; para chamar estes valores de volta temos, respectivamente, 
E0, El, E2, E3, E4 e E5. 

Apbs o RST28, podem ser efetuados diversos calculos 
de uma sb vez. Utilizamos este recurso, bem como a possibi- 
lidade de usar as membrias, no exemplo da figura 1 1 . 

Figure 11 

Exemplo: 

calcular o resultado de VI7/5) * 73 



Solugao: 

16514 LDA, +7 3E07 

CALL 151D CD ID 15 

LD A, +5 3E05 

CALL 151D CD ID 15 

RST28 EF 

Divisao 05 

Store MEM 0C0 

FIM 34 

LD A, +73 3E49 

CALL 151 D CD ID 15 

RST28 EF 

CALL NEM 0 E0 

Multiplicagao 04 
SQR 25 

FIM 34 

CALL 0B55 CD 55 0B 
RET C9 



; define o primeiro numero 
; leva o numero ao stack do 
caiculador 

; define o segundo numero 
; lev ao segundo numero ao 
stack 

; inicia os calculos 
; calcula 7/5 
; guarda o resultado na 
membria 0 

; retorna ao Assembler 
normal 

; define o terceiro numero 
; leva o terceiro numero ao 
stack 

; inicia os calculos 
; recupera o resultado 
anterior 

; multiplica (7/5) com 73 
; extrai do resultado a raiz 
quadrada 
; fim dos calculos 
; imprime o resultado na tela 
; retorna ao BASIC 



Confira o resultado impresso na tela apbs RAND USR 
16514, com o resultado obtido atraves de um programa equi- 
valente escrito em BASIC. 

Chegamos a conciusao de que e muito facil de realizar, 
desta maneira, operacbes matematicas. Ficou, porem, ainda 
uma duvida noar: 

"E se eu nio quero ter o resultado na tela?" 

Isto na pratica e bastante comum, principalmente 
quando se trata de resultados intermediaries. Ja sabemos que 
raramente podemos usar a sub-rotina em 0EA7 para "limpar" 
o stack do caiculador, por motivos de paradas indesejadas do 
programa. 

A solugao e guardar o resultado numa das seis me- 
mbrias disponiveis e realizar, antes da rotina em 0EA7, uma 
operagao matematica que, com certeza, nao resultara num 
valor negativo ou maior que 65535. Por exemplo, podemos 
fazer uma multiplicagao com 0 e chamar tranqiiilamente, a 
seguir, a sub-rotina em 0EA7. O exemplo da figura 12 ilustra 
este procedimento. 



Problema: multiplicar 9000 por 10,5 e guardar o resultado no 
enderego 20480, sem que o resultado aparega na tela. 



Solugao: 

16514 LC BC, + 105 01 69 00 



CALL 1520 CD 20 15 
LD BC, + 1001 0A00 
CALL 1520 CD 20 15 
RST28 EF 



DivisSo 05 

STORE MEM 0C0 

FIM 34 

LD BC, + 9000 01 28 23 
CALL 1520 CD 20 15 

RST28 EF 

CALL MEM 0E0 

Multiplicacao 04 
STORE MEM 0C0 

FIM 34 



; para chegar ao valor 10,5 
teremos antes que fazer um 
pequeno calculo 
intermediario 



; estamos dividindo 105 por 
10, obtendo assim, o valor 
10,5desejado 

; guarda o valor 10,5 na 
membria 0 

; final do primeiro calculo 
; define o segundo numero 
; leva 9000 ao stack do 
caiculador 
; inicio dos calculos 
(continuagao) 

; recupera o resultado 
anterior (10,5) 

; multiplica 9000 com 10,5 
; guarda o resultado na 
membria 0 



Ate aqui, nada mais fizemos do que calcular o produto 
de 9000 e 10,5 e guardamos o resultado na membria 0. Resta 
ainda uma pequena rotina adicional para limpar o stack. 
(figura 13) 



UGUE-SE A 
INFORMATICA 




r\ 
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funcionArios da 

ALCAN, XEROX, 
SEARLE, COPAS, 
INTELPA. DARLING, 
AIR SERVICE. 



MATRICULE-SE NA 
O S. COMPUTADORES. 

CURSOS DE 



BASIC • COBOL • ASSEMBLER. 

• Numero limitado de alunos por 
classe • 1 /3 de todas as aulas com uso 
' direto dos computadores, inclusive nos cursos de 
Cobol • Professores altamente qualificados • Cursos 
apostilados e apresentados com transparencies • Modernas 
instalagoes com varios equipamentos Dismac, Prolbgica, 
Sysdata entre outros • Pregos extremamente acessfveis. 




COMPUTADORES 



NUCLEO I - S. PAULO 

Av. Pacaembu, 1.280 
Fones: 66 7656/66-1513 

NUCLEO II - S. PAULO 

R. Tomds Carvalhal, 380 
(Prdximo Esta^o Metro Paraiso) 
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R. Mato Grosso, 450 



MICROHOBBY 17 




Figura 13 






LD BC,0 


010000 




CALL 1520 


CD 20 15 


; leva o valor 0 ao topo do stack 


RST28 


EF 


; multiplica com 0 


MultiplicagSo 


04 




FIM 


34 




CALL 0EA7 


CDA7 0E 


; "limpa" o stack 



Nesta altura, ja terminamos com todos os calculos 
necessarios, faltando ainda a transference do resultado para o 
enderego 20480 (figura 14). 



Figura 14 
LD BC, +5 


01 0500 


; sao 5 bytes a serem 
transferidos 


LDHL, + 16477 


21 5D40 


; HL aponta para a posigao 
do resultado 


LDDE, +20480 


11 00 50 


; DE aponta para onde deve ser 
transferido o resultado. 


LDIR 


ED B0 


; e feita a transference 


RET 


C9 


; retorna ao BASIC 



Agora podemos ter acesso a este resultado quando 
desejamos, transferindo-o, por exemplo, novamente para a 
area das memdrias do calculador, para efetuar novas ope- 
rates. 

Ap6s ler e estudar este artigo, creio que voce seja ca- 
paz de solucionar qualquer problema envolvendo operagOes 
matematicas, familiarizando-se com estas tecnicas, desco- 
brindo macetes e — assim espero — divulgar suas experien- 
ces aos programadores menos experientes. 

Alias, voltando um pouco, como e mesmo o resultado 
da elevagSo do valor 3,1506 na potencia de 5,01 13? (figura 15). 



Figura 15 
Solugao: 

16514 LD BC, +3150601 127B 



CALL 1520 CD 20 15 
LD BC, + 10000 01 10 27 
CALL 1520 CD 20 15 
RST28 EF 

Divis3o 05 

STORE MEM 0 C0 
FIM 34 

LDBC, + 5011301 Cl C3 

CALL 1520 CD 20 15 
LDBC, + 10000 01 10 27 
CALL 1520 CD 20 15 



; para chegar ao valor 
3,1506 temos de realizar 
uma operagao a parte 



; procedimento identico ao 
valor acima 



RST28 


EF 




Divis3o 


05 




CALL MEM 0 


E0 




Troca 


01 


; e necessario trocar a 
ordem dos dois numeros 
no stack 


Potenciagao 


06 




FIM 


34 




CALL 0B55 CD 55 0B 




RET 


C9 





Que, ap6s RAND USR 16514, dara o resultado 314,48373 — 
confere? o 

r ^ 

RESPOSTAS DO CURSO DE ASSEMBLY/AULA 10 



\ 

TENTE ESTA 

5 REM TENTE ESTA/TK20QQ 



10 


HOME 








20 


FOR J = 


1 TO : 


30 




30 1 


: = INT 


( RND 


(1) * 


20) + 


40 I 


: = int 


( RND 


(1) * 


35) + 


50 


HTAB 0: 


VTAB i 






60 


PRINT "! 


— \" 






70 


HTAB C: 


VTAB 1 


: + 1 




80 


PRINT "! 


3 3!" 






90 


HTAB C: 


VTAB f 


r + 2 




100 


PRINT " 


’! X !' 


/ 




110 


HTAB C: 


VTAB 


F + 3 




120 


PRINT * 


'!===!' 


/ 




130 


FOR K = 


= i TO 


50: NEXT K 


140 


HTAB C: 


VTAB 


F: PRINT " 


150 


HTAB C: 


VTAB 


F + is 


PlRINT 


160 


HTAB C: 


VTAB 


F + 2: 


PRINT 


170 


HTAB C: 


VTAB 


F + 3: 


PRINT 


CO 

CD 


NEXT J 








190 


HOME : 


END 







J 



30000 


LD 


HL, (16396) 


'2A0C40' 


30003 


LD 


A,0 


/ 3E00 / 


30005 


INC 


HL 


y 23' 


30006 


LD 


(HL),A 


TF 


30007 


INC 


A 


'3C' 


30008 


CP 


20 


TE14' 


30010 


JR 


NZ, 30005 


'C27535' 


30013 


RET 




'C9' 


30100 


LD 


D,0 


'1600' 


30102 


CP 


E 


'BB' 


30103 


RET 


C 


'D8' 


30104 


SUB 


A,E 


'93' 


30105 


INC 


D 


# 14' 


30106 


JR 


NZ,30102 


'C27596' 


30000 


LD 


D,10 


'160A' 


30002 


LD 


E,5 


'1E05' 


30004 


CALL 


30100 


'CD9475' 


30007 


LD 


B-,H 


'44' 


30008 


LD 


C,L 


'4D' 


30009 


RET 




'C9' 


30001 


ADD 


A,B 


'80' 


30002 


LD 


A, 40 


y 3E28' 


30004 


JR 


C, 30009 


'DA7539' 


30007 


LD 


A, 51 


'BE33' 


30009 


LD 


HL, (16396) 


'2A0C40' 


30012 


LD 


DE,0034 


'1122' 


30004 


ADD 


HL,DE 


'19' 


30015 


LD 


(HL),A 


'TV 


30016 


RET 




X9' 


30001 


LD 


HL,0 


'2100' 


30003 


ADD 


HL,SP 


'39' 


30004 


LD 


B,H 


'44' 


30005 


LD 


C,L 


'§4D' 


30006 


RET 




'C9' 


30002 


PUSH 


AF 


'F5' 


30003 


POP 


BC 


'Cl' 


30004 


LD 


B,0 


'0600' 


30005 


RET 




'C9' 



\ J 
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unitron 
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*3 
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J 






HARDWARE 








SUPRIMENTOS 


Hi HfeBhtea*. \ 




m ^ hmmrn mA 


INSTRUMENTAQAO 


1 



#:«ro 



Matrix 



/WCROOMFT 




COMPONENTES 

eletrOnicos 




Venha conhecer nosso show room e 
participar ativamente das mais recentes 
e revolucionarias tecnoiogias a respeito 
dos microcomputadores. Alem de 
fazer amigos, eventualmente poderao 
descobrir o que um Microcomputador 
podera fazer por voces ou pela sua 
Empresa. 

Trata-se de uma perfeita e balanceada 
estrutura para representar a aitura, as 
principals Empresas de Computadores 



tais como: Texas, Zirok, Microdigital, 
Dactari, Polymax, Unitron, Elebra, 
Aceco, Prologica, Apple II, Savage, 
Microcraft, CMA, Phillips, Ringo, 
Matrix... 



# 



CERTIFICADO DE REGISTRO NO CADASTRO DE FORNECEDORES 
DE SUPRIMENTOS DE INFORMATICA 



O SUBSECRE TARIO INDUSTRIAL 



Texas 




Intellivision 




RUA SANTA EFIGeNIA, 568 - SP - FONE: 221-9055 
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Gabriela, o computador que aprende 



Ana Lucia de Alcantara 



Anaiise do jogo foi feita por Vivian Bernardo 




Gabriela 6 um jogo didatico da 
FUNBEC — Fundapbo Brasileira para o 
Desenvolvimento do Ensino das Cien- 
cias, adaptado do original — Gabriela I 
— por Isaac Epstein (seu idealizador) ha 
aproximadamente dez anos. 0 jogo foi 
projetado para crianpas de ate dez anos, 
com o intuito de desmistificar a crenpa 
de que os computadores podem pensar 
ou imaginar. 

Conforme afirmou Verenice Leite 
Ribeiro, gerente de Marketing da FUN- 
BEC, o kit Gabriela ja foi usado tambem 
por escolas, quando os interesses das 
mesmas era transmitir aos alunos os pri- 
meiros fundamentos do processo de in- 
terapSo entre o computador e o opera- 
dor. Hoje, alguns kits do Gabriela (0 
computador que aprende) encontram-se 
numa das prateleiras da lojinha da insti- 
tuipSo, (localizada no campus da Univer- 
sidade de S2o Paulo) a espera de que al- 
guem que ali vai para comprar outros 
kits se interesse por eles. Mas, por que 
isto? 

Segundo a representante da FUN- 
BEC, quando o jogo foi projetado n§o 
havia um interesse tSo grande por Ciber- 
netica no Brasil. A id6ia e o jogo chegou 
a ser aceito por diversas escolas e ainda 
hoje algumas ainda o procura, mas o kit 
nao recebeu um investimento suficiente 
para que se formasse uma infraestrutura 
forte que justificasse um incremento 
maior de marketing em cima do mesmo. 
Afinal, a FundapSo sobrevive com re- 
cursos de outras institutes de apoio & 
pesquisa que fornecem verbas para seus 
projetos. E assim outras Sreas em que a 

20 MICROHOBBY 



FUNBEC atua, como Optica, produtos 
de laboratbrios quimico e clinico, obtive- 
ram um maior sucesso j£ que a outra 
area — na linha de produtos para o en- 
sino das ciencias — (justamente pela 
pouca verba disponivel) foi aos poucos, 
ficando em segundo piano. 

Gabriela e seus objetivos 

0 jogo original foi desenvolvido 
com o intuito de transforma-lo num ins- 
trument© de aprendizado baseado no 
processo de "tentativa e erro", que faz 
com que a mente da crianpa passe por 
um processo de selepbo de respostas ate 
chegar ao resultado desejado. 0 objeti- 
vo inicial e demonstrar como funciona o 
processo mental e nSo imitb-lo. 

0 processo de selepio e realizado 
entre os dois jogadores principals: o 
computador que aprende e o seu adver- 
sary — o homem. 

ComposipSo e funcionamento 

Gabriela I (o primeiro) e formada de 
uma caixa de madeira contendo 14 reci- 
pientes plasticos compostos de 306 ca- 
vidades. Cada cavidade possui bolinhas 
plasticas de cores alternadas que corres- 
pondem ao numero possivel de alterna- 
tiva no jogo, alem de um mapa que indi- 
ca a situap3o correspondente a cavida- 
de e um dispositivo (uma im§), usado 
para a retirada — ao acaso — de uma 
das bolinhas da cavidade entre as va- 
rias la existentes. A cor da bolinha reti- 



rada 6 que determina o lance escolhido 
pela maquina. 

0 adversario joga a seguir, dispon- 
do somente de 305 situapbes possfveis. 
Dai em diante, o jogo prossegue ate que 
se tenha as institutes finais. Caso Ga- 
briela seja derrotada, deve-se retirar as 
bolinhas que propiciaram a sua perda 
afim de que ela nbo torne a fazer esta 
jogada. Se Gabriela veneer, entbo as bo- 
linhas retornam a maquina, porque o re- 
sultado foi positivo (pois o intuito e fazer 
com que Gabriela sempre venpa — afi- 
nal e o computador). No caso de empa- 
te, as bolinhas tambbm sao devolvidas, 
sendo que o empate tambbm 6 um re- 
sultado positivo para a maquina. 



Okit Gabriela da FUNBEC 

Gabriela — o computador que 
aprende da FUNBEC foi desenvolvido 
baseado no objetivo do primeiro jogo: o 
aprendizado atraves da teoria de tenta- 
tive e erro. 0 jogo faz parte da sbrie Jo- 
gos e Descobertas da Fundapao e vem 
acompanhado de um tabuleiro de plbs- 
tico com 27 cavidades onde sao coloca- 
das as bolinhas de diferentes cores. Ao 
lado das mesmas, est3o quatro outras 
cavidades onde se acomodam as outras 
bolinhas. Acompanha-a o tabuleiro e 
duas cartelas de papelao, que possuem 
dois jogos diferentes, o 21 e o mini da- 
mas. Estes dois jogos substituem as 
modalidades do primeiro, mas possuem 
ambos os mesmos mecanismos de 
aprendizado do Gabriela I. 



Anglise dos jogos 

0 objetivo do primeiro jogo (o 
21) e fazer com que um dos dois jo- 
gadores atinjam o numero 21. Para 
isto, existem algumas regras: o inicio 
cabe sempre ao adversario de Gabrie- 
la; tanto Gabriela como o jogador po- 
de, a partir do primeiro lance, pular 
de uma a tres casas apos a posipao 
do lanpamento anterior; se o jogador 
vence, o ultimo lance de Gabriela e 
eliminado ou seja, retirado da maqui- 
na (enquanto os outros lances sao 
devolvidos). Se o contrario ocorrer 
(Gabriela veneer) todos os lances sao 
devolvidos. 

Este jogo, segundo se constata 
atinje o publico que est3 na faixa dos 
10 anos. Durante o jogo, foram en- 
contradas algumas situapbes nas 
quais n§o ha continuidade, como por 
exemplo, casos em que o "sistema" 
(com bolinhas coloridas, represen- 
tando movimentos na cartela de nu- 
meros) impede que a maquina conti- 
nue o jogo, pois elimina as bolinhas 
da quase totalidade das casas. Dian- 
te disto, conclui-se que o jogo nbo 
esta completamente "fechado" (ou 
seja, todas as situapbes levam a ma- 
quina ao resultado). A s6rie "progra- 
mavel" de lances em que Gabriela 
sempre vence pode nio ocorrer. 

A situapbo programSvel de Ga- 
briela 6 5, 9, 13, 17 e 21 (Figura 1). 

0 outro jogo de Gabriela, Mini- 
Damas, 6 constituido de um tabulei- 
ro com nove casas, exatamente 




v. 



A 




como no jogo da velha. 0 jogador faz 
o primeiro lance, escolhendo ao aca- 
so uma das bolinhas das tres primei- 
ras situapbes (de abertura) do jogo. 
Ha tres possibilidades de vitoria: 
quando o jogador consegue imobi- 
lizar uma ou mais pepas do adversa- 
rio; quando captura todas as pepas 
do adversario ou ainda, quando 
avanpa com a dama ate a terceira ca- 
sa do adversario nbo ocorre empate. 

No teste do jogo, descobriu-se 
duas situapbes de empate. Ha possi- 
bilidade de andar em linha reta e cap- 
turar somente em diagonal. 0 ma- 
nual de instrupbes que acompanha o 
jogo diz que n3o ocorre o empate. 
Porem, as situapbes de empate des- 
critas acima deveriam ser validas, 
porque a filosofia do jogo Gabriela 
considera na realidade, o empate co- 
mo um bom resultado. 

Situapbes de empate de Gabrie- 
la: 



© 




© 


© 


© 


© 




© 





SituapSo 1 



Figura 2 




Situapfio 2 



Figura 3 
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Gabriela e o TK 2000 




Viviam Bernardo 



Sera que um computador pode aprender? 
Este programs, destinado ao computador 
TK 2000, procura simular uma situagao de 
aprendizado, baseado nos conceitos de 
tentativa-e-erro e no uso de uma "punigao" 
para desestimu/ar o "erro". 

Nao se preocupe: esta punigao nao e dolorosa 
para o seu micro . 



Se voce tern lido os artigos sobre inteligencia artificial e 
maquinas que "pensam" que temos publicado, o Programa 
Gabriela servira para voce ver como podemos programar ma- 
quinas que "aprendem". 

Um programa b, antes de mais nada, um conjunto de 
instrupbes feitas em linguagem de alto nivel (BASIC, PAS- 
CAL, etc.) ou linguagem de maquina, que o computador in- 
terpreta e executa. Tudo que esta em um programa so e com- 
preensivel para o computador se codificado de acordo com 
seus caracteres interpretativos e decodificadores. 0 progra- 
mador deve fornecer todos os dados, parametros e conexbes 
logicas de programapio para que o computador possa execu- 
tar o programa. A maquina n2o tern a capacidade de gerar 
qytras informapbes alem daquelas fornecidas pelo programa- 
dor. Ela n§o pensa, deduz ou aprende, a nbo ser que voce 
fornepa todas as informapbes para isso. 

Ent2o, nesse caso, como ensinar a maquina a "apren- 
der"? E simples. Voce pode usar, por exemplo, a mesma filo- 
sofia da maquina "GABRIELA", idealizada por Isaac Epns- 
tein, que baseia-se na tecnica de aprendizado por "tentativa 
eerro". 

0 programa "Gabriela", desenvolvido para o TK-2000, 
Simula o jogo mini-damas do Kit "GABRIELA", da Funbec, e 
contem o principio de "aprender por tentativa e erro", como a 
maquina original de Epnstein. No programa n§o foram colo- 
cados todos os lances possiveis, para que nSo ficasse muito 
extenso. Um programa completo deve ter todos os lances pos- 
siveis do Gabriela (mini-damas) e do adversario, para que 
todas as possibilidades de jogada possam ser avaliadas. 

PROGRAMA GABRIELA 

0 programa comepa com a carga da matriz-jogo (ma- 
triz que contera cada fase do jogo) com as posipbes iniciais do 
mini-damas (linha 202). Os lances, do primeiro ao quinto, 
foram prefixados, sem interference da maquina, ou do adver- 
sario (escolha do programador), para simplificar o programa e 
tornar desnecessario o uso de inumeras matrizes-lance (ma- 
trizes que contem as posipQes dos pebes do jogo em cada 
lance). Os demais lances, a partir do 6?, foram armazenados 
em matrizes de ordem 3x3 (matrizes-lance), A3, B1, B2, para 
que exista a possibilidade de escolha dos jogadores (tanto do 
micro como do adversario). Os lances impares sao feitos pelo 
adversario do Gabriela, simulado no TK 2000, e os pares sao 
feitos pela maquina. 

0 programa diferencia o adversario da maquina atraves 
do numero 1 (adversario) e numero 2 (maquina). As casas 
vazias contem o numero 0. Do enderepo 210 a 300, os 5 pri- 
meiros lances fixos neste programa sao carregados com os 
numeros de acordo com o jogador; a posipao anterior ao lance 
sera carregada com 0 (exemplo linha 270). Esses primeiros 5 
lances foram escolhidos propositalmente para que duas situa- 
p5es diferentes fossem apresentadas: uma, de vitoria do Ga- 
briela (matriz-lance A3), e outra de vitoria do adversario (ma- 
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triz lance B2). No decorrer do programa, a maquina desen- 
volve o aprendizado atraves da punipao do lance que gera a 
vitbria do adversario, ate "aprender" qual o lance ideal para 
sua vitbria. A punipao, no programa, e colocar na posipao da 
matriz-lance que provocou a vitoria do adversario numero 99. 
Na figura 1 voce podera ver a logica usada para comparacao 
do lance escolhido pelo Gabriela (micro). 




OBS. 1 — a comparagSo ser£ feita com as matrizes-lance de mo- 
vimento do jogador ( nao ocorreu captura de pega do adversario). 

OBS. 2 — a comparacao serd feita com as matrizes-lance de cap- 
tura de pegas do adversario. 

Figura 1 



I 



I 




Figura 2 

A linha 311 do programa faz a escolha do 6? lance do 
Gabriela. Se o lance escolhido for uma casa vazia na matriz- 
jogo, o lance assume valor 2 e a comparapbo e feita com a 
matriz-lance A3 (linha 318). E necessario comparar as posi- 
pbes da matriz A3 com o numero 99 para verificarmos se 
algum lance dessa matriz-lance foi punido. 0 fluxograma da 
figura 2 mostra como essa comparapbo e efetuada. 

Se o lance escolhido for uma casa com o numero 1, 
significa que o Gabriela irb capturar uma pepa do adversbrio 
e a comparapbo sera feita a partir da linha 327, com a matriz- 
lance B1. No 6? lance, quando a matriz-jogo b igual a matriz- 
lance A3, o Gabriela vence e a partir da linha 400 seu numero 
de vitbrias, VG 6 adicionado de 1 e inicia-se uma nova partida. 
Neste caso, o Gabriela venceu grapas b sorte; a aleatoriedade 
de sua escolha permitiu que ela vencesse. No programa, a 
partir do 6? lance, ha somente duas matrizes-lance como 
possibilidade de escolha (A3 e B1). Quando a matriz-jogo 6 
igual a matriz-lance B1, o Gabriela captura uma pepa do adver- 
sbrio e propicia que este fapa o 7? lance. Entbo, o adversario 
vence (linha 420) e neste ponto do programa 6 feita a punipao 
do lance do Gabriela (colocar 99 no lance que proporcionou a 
vitbria do adversario; lance XL e XC da matriz-lance B1), e o 



jogo e reiniciado. Depois que ocorre a vitbria do adversario e o 
Gabriela b punido, a unica oppbo serb a escolha do lance que 
db a vitbria ao Gabriela. Dai em diante, o Gabriela, e claro, 
sempre vencera. 0 lance do Gabriela 6 salvo na linha 420. A 
linha e guardada no campo XL, e a coluna no campo XC. E 
importante ressaltar que o lance do Gabriela deve sempre ser 
salvo quando ele nbo vence e o prbximo lance, proporcionado 
ao adversario, fapa com que ele venpa. A linha 500 contbm a 
mensagem de movimento invblido para que o jogador (o 
adversbrio do Gabriela), nbo efetue um lance fora das especi- 
ficapbes das regras do jogo mini-damas. 

A rotina de plotagem do lance b usada para os dois 
jogadores, mudando-se somente a cor de acordo com o lance 
efetuado (azul para o adversario; amarelo para o Gabriela). 

COMO EXPANDIR O "GABRIELA" 

Voce pode aumentar o jogo "'Gabriela", implementan- 
do outras possibilidades de lances do adversbrio e da mbquina 
no programa. Voce poderb ter o numero de matrizes-lance que 
a membria de seu micro puder armazenar dentro de um 
mesmo programa. Basta que, para isso, vocb siga a mesma 
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logica e estrutura do programa "Gabriela", comparando os 
lances da matriz-jogo com a matriz-lance e punindo os lances 
do Gabriela que proporcionarem a vitoria do adversario. Nao 
esquega de zerar a posigao a partir do qual o lance sera feito 
(linhas 318 e 327). Deve-se, tambem, invalidar o lance da ma- 
quina que ja foi feito por ela, ou seja, um lance com a posigao 



igual a 2 (linha 315: volta para a instrugao 311 onde a maquina 
efetua sua escolha). 

Esta tecnica de programagao pode ser usada para fazer 
programas de inteligencia artificial como: jogo de damas, jogo 
da velha e outros, tornando seu computador um micro inven- 
cfvel apos um periodo de aprendizagem. 



LIST 




279 GET El: IF El < > "C" THEN 279 


5 REM GABRIELA /HICROMEGA - SETEMBRO 




280 REM 4. LANCE (GABRIELA) 

281 PRINT s PRINT 


1984 




282 PRINT "0 GABRIELA FAZ SUA ESCOLHA 


7 REM CARGA DAS MATRIZES LANCES 




": FOR A = i TO 300: NEXT A 


14 FOR I = 1 TO 3: FOR J = i TO 3: READ 




285 COLOR = 2SL = 2:C = 2: G0SUB 520 


A3(I,J): NEXT J: NEXT I 




Q:J(L r C) = 2 


15 FOR I = 1 TO 3: FOR J = 1 TO 3: READ 




290 COLOR = 0:L = i:C = i: G0SUB 520 


Bi(I,J): NEXT J: NEXT I 




0:J(L r C) = 0 


16 FOR I = 1 TO 3: FOR J = 1 TO 3: READ 




291 PRINT : PRINT : PRINT "DIGITE ’C’ 


B2(I,J): NEXT J: NEXT I 




PARA 0BTER 0 PROXIMO LANCE": GET 


20 DATA 0,2, 0,1, 1,0, 0,0,2, 0,0, 0,2,1, 




El: IF El < ) "C" THEN 291 


2, 0,0, 0,0, 1,0, 2, 0,2, 0,0,0 




293 PRINT : PRINT : PRINT "SEU LANCE 


50 REM INICI0 DO PROGRAMA 




SERA:": FOR A = 1 TO 300: NEXT A 


60 VA = 0:VG = 0 




295 COLOR = i:L = 2:C = 2: G0SUB 520 


200 K = 0:U = 0: TEXT : HOME : G0SUB 5 




0:J(L,C) = 1 


000 




300 COLOR = Q:L = 3:C = 3: G0SUB 520 


202 FOR I = 1 TO 3: J( 1 ,1) = 2: NEXT I 




0:J(L 7 C) = 0 


: FOR I = 1 TO 3:J(2,I) = 0: NEXT 




301 PRINT : PRINT : PRINT "DIGITE ’C’ 


is FOR I = 1 TO 3SJ(3,I) = is NEXT I 




PARA 0BTER 0 LANCE DE ESCOLHA DO 


205 COLOR = 2: FOR C = 1 TO 3:L = 1: 




6ABRIELA" 


60SUB 5200: NEXT C 




302 GET El: IF El < > "C" THEN 302 


207 COLOR = i: FOR C = 1 TO 3:L = 3: 




305 REM 6. LANCE (GABRIELA) 


60SUB 5200: NEXT C 




307 PRINT : PRINT 


210 REM 1. LANCE ( ADVERSAR 10) 




310 PRINT "0 GABRIELA FAZ SUA ESCOLHA 


212 PRINT "SEU LANCE SERA:": FOR A = 




": FOR A = 1 TO 300: NEXT A 


1 TO 300: NEXT A 




311 L = INT ( RND (1) * 3) + i:C = 


215 COLOR = i:L = 2:C = 1: G0SUB 520 




INT ( RND (1) * 3) + 1 


0:J(L,C) = 1 




312 IF L < 1 OR L > 3 OR C ( i OR C > 


220 COLOR = 0:L = 3:C = is G0SUB 520 




3 THEN 311 


0:J(L,C) = 0 




313 IF J(L,C) = 0 THEN 318 


225 PRINT "DIGITE ’C’ PARA 0BTER 0 PR 




314 IF J(L f C) = 1 THEN 327 


0XIM0 LANCE" 




315 GOTO 311 


228 GET El: IF El < > "C" THEN 228 




318 LET J(2,3) = 0: LET J(L f C) = 2 


235 REM 2. LANCE (GABRIELA) 




320 K = 0: FOR H = 1 TO 3: FOR I = 


240 PRINT "0 GABRIELA FAZ SUA ESCOLHA 




1 TO 3: IF J(H,I) = A3(H f I) THEN K = K + i 


": FOR A = 1 TO 300: NEXT A: 




321 NEXT I: NEXT H 


250 COLOR = 2:L = 2:C = 3: G0SUB 520 




322 LET U = 0 


0:J(L,C) = 2 




323 FOR H = 1 TO 3: FOR I = 1 TO 3: 


255 COLOR = 0:L = 1:C = 3: G0SUB 520 




IF A3(H r I) = 99 AND L = H AND C = I THEN 


0:J(L,C) = 0 




U = W + 1 


257 PRINT : PRINT 




324 NEXT I: NEXT H 


260 PRINT "DIGITE ’C’ PARA 0BTER 0 PR 




325 IF K = 9 AND U = 0 THEN GOTO 400 


OXIMO LANCE" 

262 GET El: IF El < > "C* THEN 262 




326 J(L,C) = 0: J(2 r 3) = 2: GOTO 311 


265 REM 3. LANCE (ADVERSARIO) 




327 LET J(i r 2) = 0: LET J(L,C) = 2 


266 PRINT : PRINT 




328 K = Q:W = 0: FOR H = 1 TO 3: FOR I 


268 PRINT "SUA ESCOLHA SERA:" 




= 1 TO 3: IF J(H,I) = Bi(H r I) THEN K = K + 1 


269 FOR A = 1 TO 300: NEXT A 




329 NEXT I: IOT H 


270 COLOR = i:L = 2:C = 2: G0SUB 520 




332 FOR H = i TO 3: FOR I = 1 TO 3: 


0:J(L,C) = 1 




IF B1 (H, I ) = 99 AND L = H AND C = I THEN 


275 COLOR = 0:L = 3:C = 2: G0SUB 520 




w = y + i 


0:J(L,C) = 0 




334 NEXT I: NEXT H 


276 PRINT : PRINT 




335 IF X = 9 AND U = 0 THEN GOTO 420 


278 PRINT "DIGITE 'C' PARA 0BTER 0 PR 
OXIMO LANCE" 




336 LET J(L,C) = i: LET J(i y 2) = 2: GOTO 311 
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400 COLOR = 2: GOSUB 5200 

402 COLOR = OsL = 2:C = 3: GOSUB 520 
0 

403 VG = VG + is IF VG > = 10 THEN 60 
0 

405 PRINT "EU VENCI...": FOR A = 1 TO 
900: NEXT A: PRINT : PRINT "DIGIT 
E 7 N 7 PARA NOVA PARTIDA": PRINT * 

VG= "-VG: PRINT "VA= ";VA 

410 GET ES: IF ES < ) "N" THEN 410 

415 GOTO 200 

420 XL = L:XC = C: COLOR = 2: GOSUB 5 

200: COLOR = 0:L = l:C = 2: GOSUB 5200:J(L,C) = 0 

430 REM 7. LANCE (ADVERSARIO) 

435 GOSUB 5290 
438 LET J(2,2) = 0 

440 J(L,C) = i:K = 0: FOR H = i TO 3: FOR I = 

1 TO 3: IF J(H f I) = B2(H,I) THEN 

K = K + 1 

441 NEXT I: NEXT H 

442 IF K < >9 THEN 500 
445 COLOR = i: GOSUB 5200 

450 COLOR = 0:L = 2:C = 2: GOSUB 520 
0 

455 PRINT "VOCE VENCEU! EU ESTOU APRE 
NDENDO": FOR A = 1 TO 900: NEXT A 
:VA = VA + i: PRINT "VG= ";VG: PRINT "VA= "-VA 
460 Bi(XL,XC) = 99: PRINT "DIGITE 7 N' 

PARA NOVA PARTIDA" 

462 GET El: IF El < > "N" THEN 462 
464 GOTO 200 

500 PRINT "HOVIHENTO INVALIDO": PRINT 
"DIGITE 7 N 7 PARA REINICIAR A PART 
IDA" 

505 GET El: IF El < > "N" THEN 505 

506 GOTO 200 

600 PRINT "EU VENCI NOVAMENTE, JA APR 
ENDI A JOGAR": FOR A = 1 TO 900: NEXT A 
605 TEXT : HOME : PRINT "FIM /GABRIEL 
A/MICROMEGA-SETEMCRO 1984" 

610 END 

5000 REM ROTINA DE APRESENTACAO 

5001 HOME : PRINT "GABRIELA: A MAGUIN 
A 0UE APRENDE": PRINT : PRINT "RE 
GRAS DO JOGO": PRINT "A) PARA MOV 
IMENTAR-SE ,0 LANCE DEVE DER NA V 
ERTICAL PARA FRENTE": PRINT 

5005 PRINT "B) PARA CAPTURAR 0 LANCE 

DEVE SER EM DIAGONAL": PRINT : PRINT "OBJETIVO 

DO JOGO- VENCE AQUELE OUE: 

": PRINT : PRINT "- ELIMINAR AS P 
ECAS DO ADVERSARIO" 

5010 PRINT "- ATINGIR A ULTIMA FILA 0 
POSTA A SUA INICIAL": PRINT "- IM 
OBOLIZAR 0 ADVERSARIO": PRINT : PRINT 
"SE A MAQUINA OU VOCE EFETUAREM UM 
LANCE NAO PERMITIDO APARECERA UMA 
MENSAGEM" 

5015 PRINT "VOCE JOGA COM 0 AZUL- EU 
COM 0 AMARELO" 

5020 PRINT : PRINT "DIGITE 7 J 7 PARA 0 
BTER A TELA DO JOGO" 



5025 


GET El: IF ES < > "J" THEN 5025 


: RETURN 




5100 


REM ROTINA DE CONSTRUCAO DA TEL 


A 






5105 


HOME : GR : COLOR = 5: FOR I = 


10 TO 25: PLOT 1,12: PLOT 1,22: 


: NEXT I: 


FOR I 


= 5 TO 31: PLOT 15,1: PLOT 


20, 1 : 


NEXT I 




5110 


RETURN 




5200 


REM ROTINA DE PLOTAGEM DO LANCE 


5205 


IF L = 1 AND C = 1 THEN 


PLOT 12 


,8 






5210 


IF L = 1 AND C = 2 THEN 


PLOT 18 


,8 






5215 


IF L = 1 AND C = 3 THEN 


PLOT 23 


>8 






5220 


IF L = 2 AND C = 1 THEN 


PLOT 12 


,17 






5225 


IF L = 2 AND C = 2 THEN 


PLOT 18 


,17 






5230 


IF L = 2 AND C = 3 THEN 


PLOT 23 


,17 






5235 


IF L = 3 AND C = 1 THEN 


PLOT 12 


,27 






5240 


IF L = 3 AND C = 2 THEN 


PLOT 18 


,27 






5245 


IF L = 3 AND C = 3 THEN 


PLOT 23 


,27 






5250 


RETURN 




5290 


REM ROTINA DE ESCOLHA DO ADVERS 


ARIO 






5300 


PRINT "GUAL SEU LANCE?": 


PRINT " 


LINHA?(KL>3)": INPUT L: VTAB 22: 


HTAB 


16: PRINT L: PRINT "COLUNA? 


<KC>3>": INPUT C: VTAB 22: HTAB 


18: PRINT C 




5305 


IF L < 1 OR L > 3 OR C ( 


1 OR C > 


3 THEN 5300 




5310 


RETURN 
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O Macintosh da Apple 




Daniel R. Falconer/ Wilson Jose Tucci 

Introdupao 

No inicio de 1984, em sua reuniao 
anual, a Apple Computer finalmente lan- 
pa seu novo computador, ja tao espe- 
rado e comentado. Ja acontecera algo 
semelhante ao que houve com o PCjr — 
muita expectativa em torno de sua pu- 
blicidade, muitas historias sobre o que 
esta "maravilhosa maquina" poderia, ou 
nao, fazer. Surgem noticias de que a 
Apple estaria prestes a lanpar urn com- 
putador portatil, de tecnologia avanpa- 
da, utilizando-se dos resultados de pes- 
quisas feitas em torno de "janelas" e 
multi- tasking, talvez ate semelhante ao 
Lisa, introduzido no mercado algum 
tempo antes, pela propria Apple. Certa 
epoca houve ate boatos de que o pro- 
jeto nao sairia enquanto n3o fosse com- 
pativel com o IBM PC. As expectativas 
aumentam com a propaganda "1984", 
largamente divulgada nos Estados 
Unidos. 

Chega janeiro de 1984, com a apre- 
sentap3o do novo computador. Por fo- 
ra, uma estrutura leve, fugindo comple- 
tamente das tendencias atuais: um 
"design" vertical, ocupando pouco mais 
que uma folha de papel deixada sobre a 
mesa, com uma tela de 9 polegadas e 
um microfloppy de 3.5 polegadas. Liga- 
dos a ela, um teclado simples notavel- 
mente sem teclas especiais e um "mou- 
se", um pequeno aparelho apontador, 
de tecnologia desenvolvida inicialmente 
pela Xerox, em seu centro de pesquisas 
de Palo Alto, e mais tarde adaptada e 
comprovada pela Apple, para a Lisa. Por 
dentro um circuito genialmente simples, 
com 128k de RAM e alguns chips que 
compoem o video de alta resolupao, o 
relogio interno, o sistema de comuni- 
capoes, o controlador de disco e o som, 
tudo isso puxado por um MC68000 e 8 
Mhz e pelos 64k de codigo altamente 
eficientes, armazenados em ROM. Mui- 
to mais do que uma versSo reduzida e 
limitada do Lisa, como esperava alguns, 
um computador que goza de uma per- 
sonalidade ate agora nunca vista em 
qualquer sistema, de qualquer prepo. 
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0 que e o Macintosh? 

Uma maquina especial \ um computador 
revo/ucionario ? 

Ou a penas um entre outros tantos que 
aparecem e desaparecem todos os anos no 
mercado mundial, como marcas de cigarro 
ou automoveis ? 

Estas e muitas outras perguntas sobre o 
Macintosh sao respondidas por seus autores 
neste artigo. 



A f ilosof ia por tras do Mac 

A Apple mostrou ser uma empresa 
em evolupao. No inicio de sua historia, 
procurou atingir com seus produtos — o 
Apple I e, logo depois, as varias versoes 
do Apple II — a faixa dos "aventurei- 
ros" e experimentadores, criando siste- 
mas completamente abertos aos seus 
usuarios, com documentapao extensa e 
completa de toda a parte de hardware e 
boa parte do software interno. Raro era 
o computador que se mantivesse em seu 
estado original, como veio da fabrica; as 
modificapoes tornaram-se as mais diver- 
sas imaginaveis, desde a simples insta- 
lapao de um cart§o periferico, ate alte- 
rapoes nos proprios circuitos. 

Com a introdup§o do Macintosh, a 
Apple deixa de lado completamente 
essa imagem, procurando atingir o outro 
extremo da faixa de usuarios — aqueles 
que nao tern qualquer interesse em tirar 
a tampa de sua maquina e fazer expe- 
riences la dentro — dando a eles a com- 
binapao perfeita de hardware de alta tec- 
nologia, simples e extremamente efi- 
ciente, e software inovativo, com um 
meio de contato com o usuario padro- 
nizado e bem definido, dentro de um 
sistema operacional essencialmente 
transparente ao usuario ou programa- 
dor comum. 

A inf luencia do Lisa 

Trabalhando no Mac, nota-se niti- 
damente a influencia de seu irmao mais 
velho, o Lisa. Desde o controle pelo 
"mouse", praticamente dispensando o 
teclado — exceto na digitapao de texto 
— ate a ideia de se fazer a tela represen- 
tar uma mesa de trabalho, com aplica- 
poes, arquivos e pastas que podem ser 
abertos e fechados, como na vida real, e 
organizados como se desejar, pode ser 
sentida essa chamada "tecnologia Li- 
sa". 

Mas a principal preocupapao do 
grupo que idealizou o Mac nao foi qual- 
quer tipo de compatibilidade com siste- 
mas ja existentes. Quando Steve Jobs 



reuniu, aos poucos, sua equipe de tra- 
balho em uma localidade distante do 
resto da empresa (atitude considerada, 
por alguns, uma tentativa de Jobs de 
voltar as suas origens, quando o Apple 
Computer nascia de uma pequena gara- 
gem), sua intenpSo era a de criar um 
computador de uso geral, de baixo 
custo e muito mais facil de usar que 
qualquer um que estivesse no mercado. 
Mas, principalmente, por ser um com- 
putador realmente destinado ao usuario 
final, ele deveria ser confiavel a tal pon- 
to de nunca precisar de manutencao. 
Ele viu na tecnologia Lisa a resposta 
para a facilidade de uso; restava, entao, 
tornar essa tecnologia acessivel. 

Simplicidade de projeto 

A confiabilidade, no que diz respei- 
to a eletronica, foi em grande parte me- 
rito de Burrell C. Smith, que criou uma 
placa contendo pouquissimos chips, to- 
dos LSIs especializados e de altissima 
qualidade e capacidade. Um exemplo ti- 
pico: todo o controlador de disco — que 
em muitos computadores e um circuito 
separado, chegando a ter dezenas de 
componentes — foi reduzido a um unico 
chip. Quanto as duas saidas seriais, ao 
inves de pegar um controlador padrao. 
Smith escolheu um chip que se destaca 
em meio aos outros, um controlador de 
comunicapoes que permite velocidades 
de transference de 230 kbits por segun- 
do, ou ate quase 1 Megabit por segundo 
com "clock" externo (isso comparado 
com 9.6 kbits por segundo de um con- 
trolador mais comum). 

Tanto por motivo de simplicidade e 
custo quanto por espaco e confiabili- 
dade, a equipe decidiu eliminar os slots 
no Macintosh. Os conectores de cartoes 
perifericos sSo uma grande causa de 
problemas em um sistema, alem de au- 
mentarem significativamente o tamanho 
e o custo final do computador. Como 
ocorreu com os modelos anteriores da 
Apple, n3o havia como prever o que se- 
ria instalado nesses conectores; portan- 
to, uma serie de precaupoes tinha que 



ser tomada, tanto em hardware — co- 
mo, por exemplo, instalando uma fonte 
de alimentagao de alta capacidade — 
quanto em software — compatibilidade 
com cartoes e entre um e outro cartao. 
Com o enorme potencial de comunica- 
goes do Mac, sem deixar de dar credito 
ao excelente software que faz o contro- 
lador serial funcionar, toda interacao 
entre computador e perifericos e feita 
serialmente — uma solugao que, ao 
mesmo tempo, diminui drasticamente 
os custos e aumenta infinitamente a 
confiabilidade do computador. A 
-mesma ideia aplica-se quando percebe- 
mos que ha apenas duas placas de cir- 
cuitos dentro do Mac: com a redugao do 
numero de pegas vem a consequente 
diminuigao na quantidade de conexoes 
— a parte que mais da problema em um 
computador. 

O drive 

A escolha do driver da Sony foi 
mais um passo rumo a eficiencia e con- 
fiabilidade do Mac. Para comegar, o 
proprio disco magnetico da Sony, de 
3.5” e comprovadamente mais resis- 
tente — alem de, em alguns casos, 
armazenar mais informapoes — que o 
floppy de 5.25”, hoje largamente utili- 
zado. Ainda assim, a equipe foi mais 
adiante: conseguiram que a Sony fizes- 
se para eles algumas modificagoes no 
desenho de seu driver, colocando nele 
coisas como: velocidade de motor varia- 



vel, controlada por software, ejegao do 
disco, tambem controlada por sofware, 
e o aumento do numero de trilhas no 
disco, de 70 para 80. 

Com a ejegao feita por software, 
um programa nunca tern que se preo- 
cupar com o usuario removendo o disco 
quando nao deve. 0 controle da veloci- 
dade, alem de garantir sempre um fun- 
cionamento otimo do drive e a leitura de 
qualquer disco (do Mac, e claro), per- 
mite que mais informapoes sejam grava- 
das nas trilhas externas, diminuindo a 
velocidade do motor ao acessa-los. Em 
outras palavras, a densidade de grava- 
gao no disco pode ser mantida linear- 
mente constante ao longo de todas as 
trilhas, contra uma densidade radial 
constante nos drivers comuns. A princi- 
pal consequencia disso e que, enquanto 
outros computadores que usam os mi- 
crofloppies conseguem armazenar por 
volta de 270k por face, o Mac coloca 
400k por face — 800k em um unico 
disco, quando sair o driver de dupla 
face. 

Desenvolvimento em conjunto 

Talvez o fato mais importante seja 
que, usando as palavras de propagan- 
das feitas para o Mac, a primeira vez que 
"engenheiros de hardware realmente fa- 
laram com engenheiros de software em 
um tom de voz moderado”. Em outras 
palavras, todo o processo de criagao do 
computador foi acompanhado dos dois 



lados, com o desenvolvimento de soft- 
ware ocorrendo paralelamente ao de- 
senvolvimento de hardware, colocando 
no computador o hardware que o soft- 
ware precisava, elaborando software 
para fazer com que todo o hardware 
funcione eficientemente. Andy Hertz- 
feld, com seu software, conseguiu fazer 
com que tudo dentro do Mac funcio- 
nasse ao mesmo tempo: enquanto se 
esta gravando um bloco de informapoes 
no disco, pode-se colocar a impressora 
em funcionamento, ao mesmo tempo 
em que se produz um som com quatro 
vozes, ou se movimenta o ”mouse”, ou 
se pressiona uma tecla. 

Internacionalidade 

Mais adiante, no desenvolvimento 
do computador, a equipe percebeu que 
ela queria leva-lo ao mundo todo. Do 
modelo final foram retiradas todas as 
palavras em ingles, colocando figuras 
para identificar conectores; a fonte de 
alimentagao tornou-se internacional: o 
sinal de 60 Hz para o video (na maioria 
dos computadores retirado diretamente 
da rede eletrica) e gerado internamente, 
possibilitando o uso do Mac em areas 
com corrente alternada de 50 Hz; o te- 
clado e mapeado por software, poden- 
do ser redefinido para qualquer lingua; 
como os caracteres sao desenhados na 
tela pelo microprocessador, estes po- 
dem ser redefinidos para uma lingua 
qualquer. 



COMO UM COMPUTADOR 
DARDO - O MELHOR PROGRAMA 
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Figura 1 : sub menu do aplicativo Me Writer 



Figura 2: Desenho executado com o aplicativo Mac Print 



r 



Errata: Perspectiva exata 



Tivemos um pequeno problema na 
listagem do programa demonstrative 
de "Perspectiva Exata", publicado na 
revista Microhobby r\°. 13. Aqui vao 
os trechos da listagem que em alguns 
exemplares n§o puderam ser lidos. 



3040 RETURN 

3055 DATA 130,48,143,49,200,40,190,3 

6,130,48,145,11,159,3,159,121,145 

,112,145,11,130,37,130,48,190,36, 

190,17,130,37,158,106,172,112,159 

,121,145,112,158,106,190,17,200,2 

9,200,40,190,36,190,17 

3058 DATA 159,3,172,11,172,112,159,1 

21,159,3,159,42,190,36,200,40,172 

,45,159,42 

4000 REM R0TINA DE C0NSTRUCA0 DA ESC 
ADA EM PERSPECTIVA 
4010 HOME : HGR : HC0L0R = 7 
4020 FOR N = i TO 21 
4025 READ Xi,Yi,X2,Y2,X3,Y3,X4,Y4,X5, 
Y5: HFL0T XI, Yi TO X2,Y2 TO X3,Y3 
TO X4,Y4 TO X5,Y5: NEXT N 
4030 GET Cl: IF Ci < > "C" THEN 4030 



5040 RETURN 

5050 REM DADOS LETRA M 
5055 DATA 40,55,58,50,58,73,40,80,40 
,55,40,55,58,50,69,60,53,65,40,55 
,80,50,69,60,53,65,65,55,80,50,80 
,50,65,55,65,80,80,73,80,50 
5060 REM DADOS LETRA I E C 
5065 DATA 83,55,97,50,97,73,83,80,83 
,55,100,55,112,50,112,72,100,80,1 
00,55,100,55,120,55,130,50,112,50 
,100,55,100,80,112,72,130,72,120, 
80,100,80 

5070 REM DADOS LETRA R 

5075 DATA 130,55,155,55,164,50,140,5 

0,130,55,130,55, 155,55,155,65, 130 

,<S5, 130,55, 155,55, 155,65, 164,58,1 

64,50,155,55,130,65,140,58,164,58 

,155,65,130,65,130,65,140,58,164, 

71,155,80,130,65,130,55,140,50,14 

0,72,130,80,130,55 



v y 



Um aspecto muito importante e a 
incrfvel facilidade com que um aplica- 
tivo qualquer pode ser traduzido de uma 
lingua para outra. Atraves de um editor 
especial, todos os textos produzidos por 
um aplicativo podem ser retirados, tra- 
duzidos, um a um, e recolocados em seu 
lugar. Essa facilidade vem do fato que o 
Mac armazena os textos em uma area 
bem definida, separada do resto do pro- 
grama. Assim, eles podem facilmente 
ser trocados e, mesmo que o novo texto 
precise de mais espaco na tela que o 
anterior, a janela de texto pode ser ma- 
nipulada para faze-lo caber — tudo isso 
sem mexer em um byte sequer do pro- 
grama em si. Com esta capacidade, 
qualquer programa desenvolvido para o 
Mac pode ser comercializado em todo o 
mundo, adaptando-se em questao de 
minutos. 

Conclusao 

O Macintosh e, sem duvida, um 



computador inovador, tanto em hard- 
ware quanto em software. Sua facili- 
dade de uso faz do Mac um computa- 
dor extremamente agradavel de se tra- 
balhar e explorar. Dia apos dia surgem 
novos produtos, programas e periferi- 
cos, todos igualmente faceis de usar, 
gracas a padronizapao estimulada pela 
propria Apple. Todo o investimento, de 
mais de tres anos de projeto, trouxe a 
nos este novo computador, corajosa- 
mente contrariando todas as tendencias 
esteticas e de compatibilidade com 
outras maquinas — especialmente a ten- 
dencia de compatibilidade com o IBM 
PC. 

Introduzido inicialmente a US$ 2495 
(com 128k e um drive), em alguns me- 
ses seu preco ja caiu para $ 2195; ao 
mesmo tempo, foi lancada a versao de 
512k, varios meses antes do previsto, a 
$ 3195. Mesmo com a queda de preco, 
porem, o Mac esta ainda um pouco lon- 
ge de poder atingir com forca o publico 
dos "home computers". 




5 items 



11 IK available 



System Folder 



6 items 



209K in folder 



1 1 IK available 






6 File Edit Uieuj Special 




28 MICROHOBBY 






CALCULADORAS 




Curso de Programacao HP-41 
Aula 3 

Jose Eduardo Moreira 
Wilson Jose Tucci 



Agora que voce esta acostumado 
com a HP-41 e ja sabe usa-la bem, po- 
demos entrar no assunto que deve Ihe 
interessar muito: a "programagao". 

Se voce nunca programou antes, 
vera que programas nao tern nada de 
"magico" e depende muito mais de voce 
do que da maquina. Se voce ja esta 
acostumado a programar microcompu- 
tadores, vai reparar que programar a 
HP-41 da um pouco mais de trabalho, 
mas em compensagSo, ela tambem ofe- 
rece alguns recursos habituais em mi- 
crocomputadores. 

Para voce fazer um programa, tera 
antes que estrutura-lo e para isto tera 
que estudar. N3o devera esquecer que a 
sua capacidade de fazer programas e o 
resultado do treinamento continuo e ra- 
ciocinio aplicativo. Quanto mais fizer, 
melhor sabera faze-lo: 

Um programa de calculadora con- 
siste de uma seqiiencia de passos; cada 
passo constituido por uma fungao da 
calculadora ( + STO, RCL, GTO, 

SIN, COS, IN, . . .), essa seqiiencia de 
passos realiza um trabalho. 

Programa 

Fagamos um programa para calcu- 
lar o valor da fungao y = sin(x) + 3 para 
um dado x. Se voce fosse calcular o va- 
lor dessa fung3o para um certo x, voce 
faria: 

x-* digitaria o numero 

SIN 

3 

+ 



Um programa para calcular essa 
fungao teria os seguintes passos: 



01 


LBL 


02 


SIN 


03 


3 


04 


+ 


05 


END 



FUNQAO 



3 

+ 

XEQ IALPHAI END lALPHAI 
PRGMl 

Agora o programa ja esta digitado 
na memoria da maquina. Para usa-lo 
basta dar XEQ FUN<QAO e o programa, 
ou seja, a seqiiencia de passos que o 
compoem, e executado. Usemos esse 
programa para completar a tabela: 



Todo programa da HP-41 comega 
com um nome (linha 01), que pode ter 
entre 2 e 6 caracteres. Depois vem os 
passos que executam o servigo, e entao 
o comando END, que significa fim do 
programa. 

Para introduzir esse pequeno pro- 
grama na maquina, faga: 



mm 

GTO 

LBL lALPHAI FUNCAO IALPHAI 
SIN 



X 


sin (x) + 3 


30 




45 




60 




90 





Para colocar a maquina em modo 
de graus de um XEQ ALPHA DEG 
ALPHA . Se quisessemos em radianos, 
bastaria colocar: 

XEQ lALPHAI RAD IALPHA| . 
e fazemos o que mostra a tabela I. 



Tabela 1 


digitar 


display 


CLX 


0.00 


30 


30 


XEQ lALPHAI FUNCAO lALPHAI 


3.50 


45 


45 


XEQ lALPHAI FUNCAO lALPHAI 


3.71 


60 


60 


XEQ lALPHAI FUNCAO IALPHAI 


3.87 


90 


90 


XEQ lALPHAI FUNCAO lALPHAI 


4.00 
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Voce deve achar muito chato ter 
que digitar XEQ ALPHA FUNCAO 
ALPHA cada vez que quer executar o 
programa. Felizmente podemos, atraves 
do comando ASN (Assign), associar 
uma tecla a qualquer funcao da calcu- 
ladora ou programa que fizermos. Di- 
gite: 

ASN lALPHAl FUNCAO IALPHAI 

LN 

Agora o programa que fizemos e 
executado sempre que apertamos a te- 
cla LN em modo user. A calculadora 
esta em modo user se o aviso "user" 
estiver visivel no display. Para colocar 



ou tirar a maquina no modo user, basta 
apertar a tecla USER. 

Com a maquina em modo user 



faca: 






30 


LN 


3.50 


45 


LN 


3.71 


60 


LN 


3.87 


90 


LN 


4.00 


Fluxogramas 





Fazer programas grandes direta- 
mente na HP-41 nao e um processo mui- 
to eficiente e esta muito sujeito a erros. 



Para podermos estruturar corretamente 
um programa devemos, entao, fazer seu 
fluxograma. 

Fluxograma e a representapao gra- 
fica da logica do programa e representa 
todos os passos que devem ser segui- 
dos para sua execucao. Todo fluxogra- 
ma e construido em cima de alguns pou- 
cos blocos basicos itabefa II). 

Exemplo: fapa o fluxograma de um pro- 
grama para calcular o quociente e o res- 
to da divisao de um numero M por um 
numero P, utilizando apenas as opera- 
tes de adipao e subtrapao. 



bloco 



CD 









Tabela II 



nome 


funpao 


terminal 


ponto de inicio ou termino de um 
programa 


proces- 

samento 


conjunto de operacoes aritmeticas 


decisao 


indica a possibilidade de desviar 
para outro ponto do fluxograma 
baseado numa comparapao. 


continuapao 


indica continuapao do fluxograma em 
outro lugar onde N e um numero de 
referenda 


caminho 


cada seta indica o caminho a seguir 
no fluxograma 


leitura 


entrada de dados do exterior para o 
programa. 


saida 


saida de dados do programa para o 
exterior. 




Solupao: 0 quociente da divisao entre 
MePeo numero de vezes que P "ca- 
be" dentro de M e o resto e o quanto 
sobrou de M na ultima vez, quando nao 
deu mais para tirar P. Obviamente o 
resto e menor do que P (figura 1 ). 



Exerc'tcios 

1 . Fapa um fluxograma para achar a raiz 
de equapao de 1? grau ax + b = 0, supon- 
doquea = 0. 

2. Fapa um fluxograma que, dado um 
numero natural N calcule N! 

(N! = Nx(N — 1)x(N — 2)x. . .x2x1). Por 
definicaoO! = 1. 

3. Fapa um fluxograma para achar as 
raizes de uma equapao de 2? grau 
ax + bx + c = 0. Se o discriminante for 
menor que zero, nao ha raizes reais. 



RESPOSTAS AOS EXERCICIOS DA 
AULA II 

1. Passar para RPN e calcular o resul- 
tado: 

a. 4/8/6/2 - 4t 8/6/2 = 0.04 

b. [(3 + 2)/5] + 1 4- 3 1 2 + 5/1 4 - =2.00 

c. [(2 + 3)/(4— 12)] + [(8 + 5W7 + 15)] = 

= 2 1 3+4 1 12— /8 t5+7t15+x+ = 
285.38 

d. J_+J_ A- A + A 

2 3 5 7 11 

— + 2 = 1 2/1 3/+2 5112 7/3 
13 

11/+ — 4 1 13//2+ = 6.96 

e. sin 2 (30) + cos 2 (30) = 

= 30 SINx 2 30 COSx 2 + = 1.00 

f. eTAN 2 (V30’) = 30N/)TTANx 2 e’‘ 

= 1.01 

2 Passar para a notapao infixa e cal- 
cular o resultado: 

a. 1 T 5+2*3- = (1 +5)*2— 3 = 9.00 

b. 4 1 6 1 2*3 + = 4— (6*2 ) -h 3 = 0.00 

c. 3t5 + 5t8 + 4 3-2*/ = [(3 + 5)* 

*(5 + 8)]/[(4— 3)*2] = 52.00 

d. 45tan\/x 1 = V tan 45 1 —1.00 
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fi'i'J Computacao 

la nil LIVROS DEQUALIDADE 

INICIAQAO AO BASIC 

Fox/Fox - CrS 9.900,00 

Escrito em estilo facil, este livro, destina-se especialmente aos 
principiantes que nao tenham acesso aos micros, mas que desejam 
familiarizar-se com os conceitos de programacao. 

Pode ser aplicado a qualquer computador que use a linguagem 
BASIC. 

Um texto alegre que aceita a possibilidade do leitor nao ter expe- 
rience anterior. 



McGraw-Hill 

NOVA REVOLUQAO INDUSTRIAL 

Na Era dos Computadores 
Osborne — CrS 6.900.00 

Esta convincente e provocativa obra, fornece ao leitor, esclare- 
cimentos sobre o poder e o futuro dos micros, antecipando mudan- 
cas radicais ate o final deste seculo. 

O autor explica a revolucao da microeletronica e seu impacto na 
sociedade. 

LIVROS UNIVERSITARIOS E CURSOS 



CP/M - GUIA DO USUARIO 

Hogam -- CrS 13.900,00 

Escrito para usuarios de bom nivel de conhecimento. Este livro 
considera a historia e funcoes do CP/M bem como os comandos pro- 
prios para o usuario. Inclui o CP/M-86, sistema operacional basea- 
do no 8086 e 8088. 

INTR. AOS MICROCOMPUTADORES 

Osborne - CrS 12.500,00 



PROGRAMAQAO COM BASIC 

Scheid - CrS 13.500,00 

A finalidade deste texto e fornecer um curso de programacao de 
computadores, empregando a estrutura padronizada da linguagem 
BASIC. 

Proporciona ao leitor condicoes de organizar e escrever eficien- 
temente programas de computador. 350 problemas resolvidos. Des- 
tina-se a todos o curso do ensino Superior e Tecnico que utiliza o 
BASIC como linguagem. 



Livro para principiantes em microcomputacao. Os conceitos ba- 
sicos sobre todos os Micros: como funcionam e o que eles podem 
fazer. Introduz o leitor nas linguagens de programacao, codigos bi- 
narios e aritmetica, logica, temporizacao, memoria e como usa-los. 

APPLE II - GUIA DO USUARIO 

Poole - CrS 23,900,00 

Este e o melhor e mais completo manual do APPLE II. Contem 
descricao de todas instrucoes, comandos e funcoes. 

Uma secao especial em programacao avancada e aplicacdes. 
Claro e objetivo. Obrigatorio para os usuarios do APPLE II. 

PROGRAMAS USUAIS EM BASIC 

* Programas usuais em Basic TRS-80 

* Programas usuais em Basic APPLE II 

* Programas praticos em Basic 

CrS 12.000,00 cada 

* Varios programas praticos para pequenos negocios, pequenas em- 
presas de Engenharia, Administrapao, Matematica e Economia 
Domestica. 

MANUAL DE BASIC PARA O APPLE II 

Peckham — CrS 13.900,00 

Manual pratico que possibilita ao leitor aprender a programar o 
APPLE II atraves de exercicios dirigidos. 

Escrito em linguagem facil, acessivel, dirigido a hobistas e estu- 
dantes. 

VISICALC 

Castlowitz — CrS 12.900,00 

Um guia pratico para utilizacao do software VISICALC. Atraves 
da leitura deste manual, o usuario podera obter o maximo em quali- 
dade e eficiencia em sua atividade. 

CONSTRUA SEU PROPRIO MICROCOMPUTADOR 

UsandoZ-80 
Ciarcia- CrS 22.900,00 

Este guia pratico, mostra como voce pode construir seu proprio 
microcomputador, baseado no famoso microprocessador, o ZILOG 
Z 80. 

Cada subsistema do computador e completamente explicado e 
baseado em informacoes testadas de forma que o leitor possa facil- 
mente modificar o sistema. 

Muito facil compreensao. 

PROGRAMAQAO TKS 82-83 85 CP-200 

Hurley — CrS 5.900,00 

Aprenda a programar seu TK e CP-200 muito facilmente. 
Programas em BASIC, jogos, graficos, etc., para principiantes. 
Facil assimilacao e compreensao. 



COMPUTADORES E PROGRAMAQAO 

Gottfried —CrS 13.500,00 

Quinhentos e trinta e cinco problemas resolvidos e varios pro- 
gramas usando a linguagem FORTRAN, BASIC, PASCAL e PL/1. 

Introducao a Computacao e Programacao, destinado ao merca- 
do Universitario em cursos de Engenharia e Administracao. 

CIENCIA DOS COMPUTADORES 

Tremblay - CrS 13.500,00 

Introducao a Ciencias dos Computadores, usando uma aborda- 
gem ALGORiTMICA. 

Livro texto dirigido a Engenharia, Matematica e outras areas 
afins. 

Best Seller nos EUA. 

INTRODUQAO A CIENCIA DOS COMPUTADORES 

Scheid - CrS 10.900,00 

Teoria que possibilita plena compreensao da introducao a ciencia 
dos computadores. 

Indicado para cursos de Engenharia e Administracao (2?s anos). 
Varios problemas propostos e resolvidos. 

CIRCUITOS DIGITAIS E MICROPROCESSADORES 

Taub - CrS 14.900,00 

Livro texto dirigido a Escolas de Engenharia, as areas de projetos 
logicos e microprocessadores. 

Concentram-se nos modelos 8080/8086 com detalhes para apli- 
cacoes em outras unidades. ExplicacSes claras sobre FLIP-FLOPS e 
MEMORIAS. 

300 problemas cuidadosamente elaborados. 

UM BESTSELLER! 

PROCESSAMENTO DE DADOS - Volume I 
PROCESSAMENTO DE DADOS - Volume II 

Verzello - CrS 10.900,00 

Mantendo-se independente de qualquer tipo de linguagem ou 
tipo especifico de maquina, os autores discutem todos os assuntos da 
area de maneira integral. 

Como usar a tecnologia de computacao para resolver problemas 
de processamento de dados. 

Livro introdutorio para Economia, Administracao e Engenharia. 
E acessivel a estudantes com limitados conhecimentos mate- 
maticos. 




EDITORA McGRAW-HILL DO BRASIL LTDA. 



NOME 

ENDERECO 
LIVROS 



MICROPROCESSADORES — Conceitos B£sicos 

Osborne — CrS 13.500,00 



ANEXO CHEQUE □ REEMBOLSO POSTAL □ 



A mais compreensiva e atualizada introducao ao sistema de mi- 
croprocessadores. 

Tudo sobre microprocessadores. 

A maneira mais facil e simples de entender os microprocessa- 
dores. 

Conceitos basicos. 



Rua TabapuS, 1 105 - CEP 04533 - Telefone: 881-8604 - Itaim-Bibi - 
S3o Paulo - Brasil. 



* Em todas livrarias do Brasil ou diretamente. 
Solicite catalogos. microhobby 31 



DIDATICA 



Observando os ceus 




Antdnio Fernando B. de Almeida Prado 

0 objetivo deste programa e fornecer informagbes so- 
bre posigbo, distancia, tamanho, fase e magnitude de todos 
os planetas do Sistema Solar, em qualquer data a partir de 
primeiro de janeiro de 1980. 

Foi programado na linguagem BASIC, utilizada em mi- 
crocomputadores compatfveis com o Apple II, mas pode ser 
facilmente adaptado aos demais microcomputadores. 

E necessario apenas entrar com a data desejada (dia, 
mes e ano) e o planeta, que o programa se encarrega dos cal- 
culos e imprime os seguintes dados na tela: 

a) Declinagao em graus, minutos e segundos. 

b) Ascensao Reta em horas, minutos e segundos. 

c) Distancia do planeta a Terra (em unidades astrono- 
micas, que e a distancia media da Terra ao Sol e vale 
149.600.000 km). 

d) Distancia do planeta ao Sol (tambem em U.A.). 

e) Tamanho angular (em segundos de arco). 

f) Fase, que e a porcentagem iluminada do planeta 
que e vista da Terra. 

g) Magnitude Aparente, que e uma medida do brilho 
do planeta. 

Hipbteses Ffsicas 

0 programa assume as orbitas dos planetas como sen- 
do elipses com o Sol em um dos seus focos e pertencentes a 
pianos inclinados em relagao ao piano da ecliptica (piano da 
6rbita terrestre). 

Foram desprezadas as perturbagbes que uma orbita so- 
fre devido a forga gravitacional exercida pelos demais plane- 
tas, pelo fato da diferenga de resultados nao ser muito signi- 
ficativa. 

O Programa 

0 programa obtem os resultados, seguindo os seguin- 
tes passos: 

1) Com a data fornecida, ele calcuia o numero de dias 
transcorridos desde o primeiro dia de janeiro de 1980. Isso e 
feito na sub-rotina que comega na linha 2.000 e o calculo e 
feito com exatidSo, inclusive levando em conta os anos bissex- 
tos nos finais de cada seculo. Lembre-se que um ano e bissex- 
to quando e divisivel por quatro e nao e por cem, ou quando e 
divisivel por quatrocentos. Para verificar essas condigbes, foi 
usada a comparagao da divisao do ano por quatro, cem ou 
quatrocentos com o valor inteiro da mesma divisao. Isso obje- 
tiva uma maior facilidade na adaptagao do programa a outros 
microcomputadores. 

2) Com o tempo transcorrido, os dados referentes a or- 
bita do planeta e a posigao do planeta em primeiro de janeiro 
de 1980, (fornecidos pela sub-rotina que comega na linha 
1000), calcula-se as coordenadas heliocentricas do planeta, 
isto e, a posigbo do planeta no piano de sua orbita. 

3) Faz-se o mesmo procedimento para a Terra, obten- 
do as suas coordenadas heliocentricas. 

4) Usando-se o angulo de inclinagao entre os pianos 
das brbitas e as posigbes dos dois planetas, faz-se a projegao 
da posigbo do planeta para o piano de ecliptica e uma trans- 
formagbo de coordenadas (sub-rotina que comega na linha 
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3000), que coloca o observador na superffcie da Terra. O re- 
sultado e a posigao do planeta no ceu terrestre no sistema 
equatorial, que 6 caracterizado pela declinagao e ascensao 
reta. Esse sistema e fixo em relagao a Terra e nao e preciso se 
preocupar com a hora ou posigao na superffcie da Terra. 

5) Como dispomos das coordenadas heliocentricas da 
Terra e do planeta (sua distancia em relagao ao Sol e angulo 
em relag2o a uma origem fixa), podemos calcular a distancia 
que os separa usando a lei dos cossenos (a 2 = b 2 + c 2 + 
2bc . cosA, com a, b e c lados de um triangulo e A e o angulo 
entre os lados b e c). 0 calculo e feito pelo programa e o resul- 
tado e fornecido em unidades astronomicas. 

6) Tamb6m da trigonometria, podemos calcular o 
diametro aparente do planeta, ja que se conhece a distancia 
ate o planeta e o seu diametro. 0 calculo parte do valor tabe- 
lado de0 o . (diametro angular em segundos de arco a uma dis- 
tancia de I U.A.), e corrige este valor para a distancia real. O 
resultado tambem e fornecido em segundos de arco (1 segun- 
do de arco vale 1 /3600 de um grau ) . 

7) O ultimo calculo e o da magnitude aparente do pla- 
neta e e feito baseado na distancia do planeta ao Sol e & Terra, 
na sua fase iluminada e em uma constante que caracteriza o 
poder de reflexao do planeta. Lembre-se que quanto maior o 
valor da magnitude, menos brilhante e o planeta; e que um au- 
mento de uma unidade na magnitude diminui de 2,5 vezes o 
brilho do planeta. Para referenda, diga-se que as estrelas mais 
brilhantes do ceu tern magnitude entre 0 e — 1 . 

Programa em Funcionamento 

Apos a digitagao do programa basta acionar RUN e a 
tecla RETURN. A tela sera limpa e aparecerS uma mensagem 
pedindo o cbdigo do planeta e uma tabela de codigos (l-Mer- 
curio, 2-Venus, 3-Marte, 4-Jupiter, 5-Saturno, 6-Urano, 7-Ne- 
tuno e 8-Plutao). Basta digitar o numero do planeta desejado 
e RETURN que aparecera na tela uma mensagem pedindo a 
data. 

Digite o dia, tecle RETURN, digite o mes (em numeros 
de 1 a 12), tecle RETURN, digite o ano (em numeros comple- 
tos. Ex.: 1981 e nao apenas 81) e tecle RETURN novamente. 
Os resultados aparecerao impressos na tela. 

Precisdo dos Dados 

Para se ter uma ideia da precisao dos dados obtidos 
pelo programa, vamos apresentar um exemplo (Mercurio) 
comparado com os resultados esperados (tirados do Anuario 
de Astronomia de 1983, de Ronaldo Rogerio de Freitas Mou- 
rao — Editora Francisco Alves). 

Planeta: Mercurio 
Data: 12/02/1983 
Resultado do Programa 

Declinagao: 20 graus 23 minutos e 35 segundos 
Ascensao Reta: 20 horas 13 minutos 24 segundos 
Distancia de Terra: 1,101 U.A. 

Distancia do Sol: 0,459 U.A. 

Tamanho angular: 6,1 19 segundos de arco 

Fase: 0,722 

Magnitude: 0,761 

Resultados do Anuario 

Declinagao: 20°21 minutos Osegundo 

Ascensao Reta: 20 horas 12 minutos 6 segundos 

Distancia da Terra: 1,084 U.A. 

Distancia do Sol: nao fornecido 
Tamanho Angular: 6,2 segundos de arco 
Fase: 0,706 
Magnitude: 0,1 

A distancia do Sol nao foi fornecida no Anuario; foi 
“comparada com valores medios e se mostraram corretos. 



Antonio Fernando Berta chini de Almeida Prado e a/uno de En- 
genharia Quimica da Esco/a Po/itecnica da Universidade de 
Sao Paulo e de Fisica do Instituto de Flsica da Universidade de 
Sao Paulo. 



PROGRAMA 

3 LI ST 

10 REM ASTRONOMO 

13 REM ANTONIO FERNANDO BERTACB 
INI PE ALMEIDA PRADO 

IT s NEXT 



20 


FOR I 

T 


= 1 TO 25 s Pi 


30 


I 

PRINT 

JADO" 


"ESCOLHA 0 Pi 


40 


PRINT 




50 


PRINT 


"1- MERCURIC 


60 


PRINT 


"2~- VENUS" 


70 


PRINT 


"3- MARIE" 


80 


PRINT 


"4“ JUPITER" 


90 


PRINT 


"5-- SATURNO" 


100 


PRINT 


"6- URANO" 


1 1 0 


PRINT 


"7- NE TUN 0" 


120 


PRINT 


"8- PLUTAO" 


130 


FOR I 

T 


a 1 TO 75 P 


1 40 


.1 

INPUT 


P 


150 


GOSUB 


2000 


160 


GO SUB 


1000 



NEXT 



170 N a 360 x D / (3< 

180 IF N < 360 THEN GOTO 210 
190 N * N 360 s GOTO 180 

210 M * N + Ei - W«M - M * 3.1416 

/ 180 

220 L ■ N 4 360 / 3.1416 x EP x SIN 
( M ) + El 

^30 IF L > 0 THEN GOTO 250 
240 L = L + 3605 GOTO 230 
250 IF L < 360 THEN GOTO 270 
260 I... * L - 360 s GOTO 250 

270 V * L -■ USD * V x 3. 1416 / 18 

0 

280 R = AM x ( i - EP x EP ) / < I + 



:90 



EP « COS (V>) 

REM CAL CUE OS PARA A TERRA 



300 HE * 360 x D 



(TE -x 365.2422 



310 IF NE ( 360 THEN GOTO 330 
320 ME * NE -• 360 5 GOTO 310 
380 ME - NE + E T WT s ME * ME x 3 
.1416 / 180 

340 LE * NE 4- 360 / 3.1416 » PT x 
SIN (ME) i EI 

350 IF LE > 0 THEN GOTO 370 
360 LE •” LE + 360 5 GOTO 350 
370 IF LE < 360 THEN GOTO 390 
380 LE = LE •••• 360 s GOTO 370 
390 VE » LE - WTsVE * L'E •* 3.1416 
/ 180 

400 RE = (1 PT x PT) / <1 b PT x 
COS (VE)) 

^4 .1. 0 AU a SIN ( ( L - 0) x 3.1416 / 



180) x SIN (II x 3.1416 / .1. 
80) 

420 PS I a ATN (AU / 3 OR (1 AU 

x ALJ)) 

430 Y « SIN < < L. -• 0) x 3.1416 / 
180) x COS <11 x 3.1416 / 1 
80) 

440 X * COS ( ( L •••■ 0) x 3.1416 / 

1 80 ) 

450 KB « ATN <Y / X) 

460 IF X < 0 THEN KB * i<0 + 3„14 
1 6 

470 IF Y < 0 AND X > 0 THEN KB ~ 

K 8 4 2 x 3.1416 

480 !<8 a KB x ISO / 3.1416SLL a |< 

8 4' 0 

490 RL a R x. COS (PSD 
495 REM DEB VI 0 

500 IF P a 0 OR P a 1 THEM GOTO 
700 

510 AU * RE x SIN <<LL - LE) x 3 

.1416 / 180) / (RL •••• RE x COB 
( <LL - LE) x 3.1416 / 180) > 

520 LAM a ATN (AU) LL x 3.1416 
/ 180 

530 IF LAM > 0 THEN GOTO 550 
540 LAM a LAM 4 2 V 3.1416 k GOTO 
530 

550 IF LAM < 2 x 3.1416 THEM GOTO 
570 

560 LAM « LAM 2 * 3.1416s GOTO 

550 

570 AU a r l x TAN (PSD x SIN ( 
LAM -■ LL x 3.1416 / 180) / R 
E / SIN ((LL -• LE) x 3.1416 
/ 180) 

580 BET « ATN (AU) 

590 GO SUB 3000 
600 GOTO 800 

700 AU a rl x SIN ( (LE - LL) x 3 

.1416 / 180) / (RE -• RL x COS 
<<LE -• LL) x 3.1416 / 180)) 

710 AU » ATN <AU)sl.AM » 3.1416 4 
AU f LE x 3.1416 / 180 
720 IF LAM > 0 THEN GOTO 740 
730 LAM » LAM 4- 2 x 3.1416 k GOTO 
720 

740 IF LAM < 2 x 3.1416 THEN GOTO 
760 

750 LAM a LAM - 2 x 3.1416s GOTO 
740 

760 AU « RL x TAN (PSD x SIN ( 
LAM ~ LL x 3.1416 / 180) / R 
E SIN ( < LL •••• LE) x 3.1416 
/ 180) 

770 BET = ATN (AU) 

700 GO SUB 3000 
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800 RO » SQR (RE * RE R * R -- 
2 * R * RE ■'< COS ((LL - LE > 
x- 3.14:16 / .1.80)) 

810 IT == TO / RO 

820 FA “ <1 »• COS CLAM - L x 3.1 
416 / 180)) / 2 

830 MAG * 5 x LOG (R * RO / FB / 





3 OR (FA)) / LOG (10) - 2. 

■7 


6. 


840 


/ 

FOR I a 1 TO 258 PRINT 8 NEXT 


850 


X 

PRINT "COD I GO DO PLANET As 
P + 1 


ff %x 
7 


855 


PRINT 




860 


P R I N T " D A T A s " - B p " / " j C ? " / " 




865 


PRINT 




870 


PRINT "DECI... INACAO s "■ 




872 


IF GA a 0 AND DO < 0 THEN 
PRINT 




874 


PRINT GA p GRAUS " ; MIN ; " MIN 




"jSEGj" BEG" 




875 


PRINT 




880 


P R I N T " A S C E N S A 0 R E T A s " fit H 


// 

7 




HORAS ":.-K5s / MIN "pfitGp" SEG" 


885 


PRINT 




890 


P R I M T " D I S T A N C I A D A T E R R A 


EM 




U . A . s " y R 0 




892 


P R I N T " i U . A . « 1 4 9 6 0 0 0 0 0 K M 




895 


PRINT 




900 


PRINT "DISTANCIA DO SOL EH 
. fit . 8 " . R 


U 


905 


PR I NT 




910 


P R 1 N T " T A M A N H 0 A N G U L fit R s " p 
s" SEC DE ARCO" 


TT 


915 


PRINT 




920 


P R I N T " F A S E C P 0 R C E N T A G E M I L U 




MIN ADA) 8 "-FA 




925 


PRINT 




930 


P R I N T " M A G N I T U D E A P A R E N T E a 
»MAG 


if 


950 


END 




1000 


REM SUBROUTINE TAB EL A DE 
ADOS 


D 


1005 


P a p - 1 




1010 


DIM J ( 7 2 ) 




1020 


READ TE,ET, WT,PT 




1030 


D fit T fit 1 . 0 0 0 0 4 , 9 8 . 8 3 3 5 4 , 1 0 
596403. .016718 


d u 


1040 


FOR I - 1 TO 72 




1050 


READ J(I) 




1060 


NEXT I 




1070 


D A T A .24 0 85,2 3 1 . 2 9 7 3 , 7 7 . 


14 




4 2 128, .2 0 5 A 3 0 6 , . 3 8 7 0 9 8 6 7 . 


DO 



V 



43579 , 48 . 094 1 733 6 .. 74 v . 00000 
1918 

.1. 0 8 0 D A T A .. 6 1 5 2 1 ,355.7 3 3 5 2,131. 

2 8 9 5 7 9 2 „ 0 0 6 7 8 26,. 7 2 3 3 3 1 6,3. 

3 9 4 4 3 5 , 7 6 „ 4 9 9 7 5 2 4 , 1 6 „ 9 2 . . 0 0 0 
01721 

i 0 9 0 D A T A i . 8 8 0 8 9 r 1 2 6 » 3 0 7 8 3 , 3 3 5 
„ 6 9 0 8 1 6 6,0. 0 9 3 3 8 6 5 , 1 . 5 2 3 6 8 8 3 
, 1 » 8498011 , 49 . 4032001 , 9 . 36 , . 
000004539 

110 0 D A T A 1 1 „ 8 6224 , 1 4 6 . 9 6 6 3 6 5 , 1 
4 . 0095493 . 0 „ 0484658 , 5 . 20256 1 
. 1 . 304 i 1 8 i. 9 , 1 00 . 2520 1 75 . 1 9 6 . 

74. . 0001994 

1 1 1 0 D A T A 2 9 „ 4 5 7 7 1 „ 1 6 5 „ 3 2 2 2 4 2 , 9 
2 . 6 6 5 3 9 7 4 , . 0 5 5 6 1 55., 9 . 5 5 4 7 4 7 , 

2 „ 489374 1 , 1 1 3 „ 488834 . 1 . , 1 65 „ 6 , 
.000174 

1 1 2 0 D A I A 8 4 „ 0 1 2 4 7 „ 2 2 8 . 0 7 0 8 5 5 1. , 

172.7363288. . 0463232. 19.2181 
4, .77 2 9 8 95,7 3 . 8 7 6 8 6 4 2 , 6 5 .. 8 , „ 
00007768 

1 1 3 0 D A I A 1 6 4 „ 7 9 5 5 8 . 2 6 0 . 3 5 7 8 9 9 8 

, 4 7 . 8 6 7 2 1 4 8 , .. 0 0 9 0 0 2 1 , 3 0 . 1 0 9 5 
7 ,1.7 7 1 6 0 1 7 , 1 3 1 . 5 6 0 6 4 9 4 , 6 2 . 2 
, „ 00007597 

1 1 4 0 D A T A 2 5 0 . 9 , 2 0 9 . 4 3 9 , 2 2 2 . 9 7 2 

, . 25387 39 „ 78459 , 17 . 1 37 , 109 . 

941.8.2. . 000004073 
1150 T » J ( 9 x p + i) 

1160 El - J<9 « p + 2) 

1170 W ~ J(9 x P + 3) 

1180 EP = J ( 9 x p f 4) 

1190 AH •= J < 9 x P 4- 5) 

1200 II =“ J < 9 x p 4- 6) 

1210 0 - J<9 x p -f 7) 

1220 TO " J C 9 x P 8 5 

1230 FB ~ J ( 9 x P + 9) 

1240 RETURN 

2000 REM SUBROUTINE DAT AS 
2010 FOR I - 1 TO 25 s PRINT s NEXT 
THEN I 

2020 PRINT "DATA"" 

2030 INPUT " D I A " - B 
2040 INPUT "MES" a C 
2050 INPUT "'A NO" ? F 
2060 l< == 0#2 * 0 
2070 IF F < 1980 THEN 2020 
2080 IF F ~ 1980 THEN 2130 
.2090 FOR I = 1980 TO <F •••• 1) 

2100 IF I / 4 * I NT (I / 4) AND 
I / 100 < > I NT (I / 100) 

K a K + 1 

2110 IF I / 100 = I NT (I / 100) 

AND I / 400 » I NT (I / 400 
) THEN l< a K + 1 

J 
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2120 


NEXT 


I 










2130 


IF 


C 


zr. 


2 


THEN 


Z * 31 




2140 


IF 


C 


nn 


3 


THEN 


Z = 59 




2150 


IF 


c 


:r.: 


4 


THEN 


Z = 90 




2160 


IF 


c 


:r 4 


5 


THEN 


Z = 120 




2170 


IF 


c 




6 


THEN 


Z = 151 




2180 


IF 


c 


*.~ 


7 


THEN 


Z » 181 




2190 


IF 


c 


:n; 


8 


THEN 


Z = 212 




2200 


IF 


c 


r.." 


9 


THEN 


Z * 243 




2210 


IF 


c 




10 


THEN 


Z * 273 




2220 


IF 


c 




1 1 


THEN 


Z = 304 




2230 


IF 


c 


:::: 


12 


THEN 


Z = 334 




2240 


D -• 


B 




Z 


( r 


- 1980 ) x 


365 


2250 


IF 


F 


/ 


4 


= I NT (F / 4 ) 


AND 




F / 


. 1. 00 


< 


> I NT (F / 100 ) AND 




C > 




THEN 


D ~ 


D + 1 




2260 


IF 


F 


/ 


100 


I NT (F / 


100 ) 




AND 


: p 


/ 400 = 


I NT (F / 


400 




) AND 


c 


> 


2 THEN D ~ D + 


1 



2270 RETURN 

3000 REM SUBROUTINE SUE TRANS F 
OR MA COOR DEN AD AS 

3005 E - 23.. 441884 « 3.. .1.4.16 / 180 



3010 ANG - SIN 
COS (BET) 
(LAM) 



(BET) x COS (E> 

* SIN <E) x- SIN 



3020 

3030 

3035 

3040 

3050 

3060 



Di - 
NO 

Di 4* 
DO * 
YS ~ 
TAN 
AL * 
180 
IF 



ATN 

2 ) > 

DI * 
Di SD1 
SIN 
(BET) 
ATN 

/ 3. 14 
COS ( 



(ANG / 



180 



>GR (1 - A 



/ 3 
« ABS 
(LAM) » 

« SIN 
(YS / 

1 6 

LAM) < 0 THEN 



. 1 4 1 6 

(Di ) 

COS (E) ~ 

( E ) 

COS (LAM)) « 



AL 



AL + 180 
3070 IF YS < 0 
0 THEN AL 



3000 

3090 

3100 

3105 

3110 

3120 

3130 

3135 

3140 

3150 

3160 

::ipr«o 



Ai 
FR 
AH 
K 5 
AS 
( 60 
Fi = 
6 A = 



= AL / 

« Ax •- 
- I NT 
s I NT 
» I NT 
x FR ) ) 
= Di - 
: I NT 



GA = SON 
MIN I NT 
SEC ■- I NT 
I NT- (60 # 
RETURN 



AND 
~ Al- 
ls 
I NT 
(Ai ) 
(60 
( 60 
) . 

I NT 
(Di ) 

( DO ) 
( 60 
(60 
F 1 ) 



COS (LAM) > 
+ 3 6 0 

(AI ) 

•» FR) 

* (60 x FR - 

(Di ) 

x GA 
x Fi) 

x <60 x Fi -• 
) ) 




PARA QUEM QUER AVENTURA E MUITA AQAO ... 

EM CAD* Ell* 5 SENSACIONAIS JOGOS, EM LINGUAGEM DE MAOUINA, PARA MICROS 
DE LOGICA SINCLAIR* COM 16 K DE RAM 



BICHOS & CIA. 

■ CASCA. A COBRA 

■ CRAZY KONG 

■ CENTOPElA 

■ FROGGER 

■ SUCURI 



AVENTLRA A MISTtRK) 

■ PIRAMIDE INCA 

■ SABOTAGEM 

■ OAVENTUREIRO 

■ MAZOGS 

■ USS ENTERPRISE 



COMBATE 

■ NIGHT GUNNER 

■ ALERTA VERMELHO 

■ POLARIS 

■ OUELO 

■ SCRAMBLE 



PATRULHA G ALACTIC A 

■ NAVE MAE 

■ FUNGOSMUTANTES 

• galAtica 

■ SOS VEGA III 




SE O SEU NEOOCIO E PROGRAMAR . . . 

2 FITAS contendo as mais pooerosas 

FERRAMENTAS PARA PROGRAMAR EM BA- 
SIC OU LINGUAGEM DE MAQUINA 



ROT I - Plus 

■ SOG • Uma nova e mais poderosa versio de ROT I 
e seu scnsacional Sistema Operacional Grifico 

■ MERGE 

ROT II 



• ASSEMBLER 

• OESASSEMBLER 

■ COMPILADOR BASIC 



Procure nossos revendedores 
em todO O Brasil 



m MICROCOMPUTADORES LTDA.- 

A v Graga Aranha. 145 -S/Loja n® 1 - Rio de Janeiro • RJ 
CEP 20.030 Tel (021 ) 262-6968 



Para Agr 6 w mo s, Topdgrafos e T6cnicos Agricola 
o Programa para a Famnia Sinclair (TK83, TK85, CP200) 
e muitos outros, qua economiza horas de servipo. 

AGlIMMfSOl 

PLANILHA DE CALCULO ANALITICO 




* Aceita angulos, distances e primeiro azimute. 

* Faz compensapSo de angulos e projepSes. 

* Calcula a area em poucos segundos. 

* Mostra todas as colunas de calculo. 

* Com oppSo para imprimir em papel. 

REMETER CHEQUE DE 6 ORTN PARA: 
INFORMATICA DINAMICA LTDA. 

Rua Minas Gerais, 56 
Santa Rosa — RS. 

CEP 98.900 
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O pulo do Cavalo 




Hugo de Oliveira Campos Filho 

Feito para micros compatfveis com o TK 83/85, o pro- 
grama e baseado em um jogo de sucesso nos paises germa : 
nicos, quase tio popular quanto o das Palavras Cruzadas. E 
jogado em um tabuleiro de xadrez e utiliza uma unica pepa: 
0 cavalo. 

0 pulo do cavalo tern como objetivo fazer com que a 
pepa percorra as 64 casas do tabuleiro, porem, sem passar 
duas vezes pelo mesmo lugar. 

Podem ser feitos trajetos fechados ou abertos (como 
mostram as ilustrapbes das paginas que se seguem). No tra- 
jeto fechado, parte-se de um ponto escolhido d vontade e, 
apos se percorrer todas as casas, cai-se novamente no ponto 
de partida. Isto n§o ocorre no trajeto aberto em que, ao atin- 
gir a 64? casa, nao ha possibilidade de se retornar a primeira. 

0 matematico e gedmetra alemao Leonhard Euler des- 
cobriu um engenhoso sistema para a resolupao do quebra-ca- 
bepa. Cobre-se completamente a primeira metade do tabulei- 
ro, antes de se passar para a outra metade. O trajeto e 
fechado. 



Tabela 1 


Variavel 


DescripSo 


CTD 


Contador de lances 


X(64) 


64 bytes dimensionados para arquivar as colunas de ate 
64 lances. 


Y(64) 


64 bytes dimensionados para arquivar as linhas de ate 
64 lances. 


AS(2, 16) 


Cont6m dados que verificam a veracidade dos movi- 
mentos do cavalo. 

AS( 1 ) corresponde a coluna 
AS(2) corresponde £ linha 


XS(8,8) 


0 tabuleiro com a situapSo atual do jogo 


L 


Linha atual do cavalo 


C 


Coluna atual do cavalo 


LI 


Variavel intermedteria utilizada na atualizapao de L 


Cl 


Variavel intermediSria utilizada na atualizapSo de C 


US 


Variavel de 2 bytes utilizada na leitura do teclado 


N 


Variavel de diversas utilidades. 


J 


Variavel utilizada na leitura de AS 


1 Variavel utilizada na leitura de AS 


S 


Variavel utilizada na verificapbo da cor da casa de coor- 
denadas (L,C). 


IS 


Parte inteira de S. 


ESeFS 


Utilizadas na montagem do tabuleiro. 



Em 1773, o matematico Collini descobriu outro meto- 
do. Uma area de 16 casas e demarcada no centro do Tabu- 
leiro. S3o, entao, alternados doze e quatro pulos, fora e den- 
tro da area demarcada, respectivamente. 0 trajeto e aberto. 

Na tabela I mostramos o quadro das variaveis e na ta- 
bela II mostramos a estrutura do programa. 



TABELA II: Estrutura das Linhas 



Linhas 


FunpSo 


30 


Expande 0 display 


50e 60 


Imprime 0 tftulo 


80 


Zera 0 contador de lances 


90e 100 


Dimensiona x e y 


110a 130 


Dimensiona e atribui valores d matriz AS 


140 


Dimensiona XS 


160 a 200 


Inicio dejogo 


210 e 220 


Pass a para L e C as coordenadas digitadas pelo jogador 
em US. 


230 


Incrementa 0 contador (CTD) 


250 


Imprime 0 lance no tabuleiro 


260 e 270 


Arquiva as coordenadas atuais 


290 


Impressao do ultimo lance 


310 e 320 


Passe para LI e Cl as coordenadas digitadas pelo jo- 
gador em US. 


330 a 400 


Verifica se 0 lance feito 6 valido ou nao. No primeiro ca- 
so segue para a linha 410, no segundo caso cai na 390. 


410a 460 


Atualiza as coordenadas do cavalo 


420 


Verifica sea casa (LI, Cl) esta ocupada 


450 a 550 


Leitura do teclado 


560 a 610 


Verifica se a casa e preta ou branca para a impressao do 
caractere correspondente. 


620a 720 


Rotina de montagem e numerapSo do tabuleiro 


730 a 770 


Verifica se 0 quebra-cabepa ja foi resolvido 


780 a SlO 


Acusa a montagem do quebra-cabepa 


820 a 930 


Desistbncia. Qualifica 0 jogador, pergunta se este quer 
ver a sua rota e se quer tentar novamente. 


940a 1080 


Mostra 0 "replay" dos lances feitos at6 a desistbncia ou 
at6 0 t6rmino. 


1090a 1150 


ApresentapSo e instrupbes 


1160a 1170 


Salva e executa 0 programa. 
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EXPLORANDO O TK 2000 



Apresentapao 

doTK-DOS 



Luiz Carlos Nunes Szente 
Wilson Jose Tucci 




Iniciaremos, com esse artigo, uma 
serie de esclarecimentos aos usuarios do 
TK 2000 sobre a utilizagao da unidade de 
disco e sobre sugestoes do melhor ar- 
mazenamento de informacoes (arqui- 
vos). 

Em primeiro lugar, o que vem a ser 
o TK DOS? DOS e uma abreviagao de 
"Disk Operating System" e significa Sis- 
tema de Operagao de Disco e o TK, de 
prefixo, indica que esse sistema foi 
construido especialmente para utilizar 
todos os recursos do TK 2000. 

O equipamento necessario para 
operar um disco e (figura 1): 

• CPU - TK 2000 

• unidade de disco (por exemplo: 
HORACIO da Elebra) 

• interface de disco 

• unidade de video 



O que e um disco? 

Um disco de computador (mais co- 
nhecido como disquete) e um meio de 
armazenamento de informagoes. E um 
pequeno disco de 13 cm. (5" 1/4) de 
diametro, tendo em sua superficie uma 
fina camada de um material magnetico 
semelhante a uma fita cassete. 

Um disco e dividido em 35 trilhas. 
Trilhas sao faixas concentricas para gra- 
vagao. Essas faixas sao magneticas e 
nao sulcos fisicos, como ocorre nos dis- 
cos de musica. Essas trilhas sao nume- 
radas de 0 a 34. A trilha zero e a mais 
externa e a trilha 34 e a mais interna. 

Atraves da abertura ovalada, o ca- 
begote de leitura/gravagao fica em con- 
tato com a superficie magnetica do dis- 
co. Esse contato e em termos. Na ver- 



dade fica a uma distancia de um mi- 
cron (menor que a espessura de um fio 
de cabelo). A unidade de disco consti- 
tui-se assim, em um instrumento de alta 
precisao, devendo ser muito cuidadoso 
o seu manuseio. 

A unidade de disco possui um me- 
canismo de posicionamento do cabe- 
gote que Ihe permite situar sobre qual- 
quer trilha, lendo/gravando as infor- 
magoes da mesma. 

Cada trilha esta dividida em 16 
areas que recebem o nome de setores. O 
setor e a unidade minima com a qual a 
unidade de disco trabalha. Em cada se- 
tor sao armazenados 256 bytes (uma 
pagina de memoria) (figura 2 e 3). 

Para se acessar uma informagao e 
necessario, portanto, fornecer em qual 
setor e em qual trilha se encontra a infor- 
magao. 

O disco gira a 300 rpm, os setores 
passam, um a um, sob o cabegote. 
Quando passa o setor desejado, o "dri- 
ve" efetua a operagao leitura/gravagao 
do bloco de 256 bytes. 

Para se acessar uma informagao e 
fim de que este nao se preocupe com a 
velocidade do disco, com o numero do 
setor e da trilha, foram criados progra- 
mas utilitarios. Esses programas consti- 
tuem o TK DOS. 0 TK DOS "reside" 
no proprio disquete, nas trilhas numera- 
das de0a2. 

Ao ligarmos o microcomputador, 
este possui um circuito que "percebe" 
se esta ou nao conectado a ele uma uni- 
dade de disco. Se nao estiver, ele entra 
em operagao normalmente; se estiver, a 
unidade de disco sera acionada e a ca- 
bega de gravagao posicionada para as 
trilhas 0, 1 e 2. O computador le estas 
trilhas e armazena o Sistema Operacio- 
nal na regiao destinada a segunda pa- 
gina de video (MP). Sendo assim, uma 
vez com o TK DOS em operagao, esta 
area nao devera ser usada. 

0 ato de colocar o Sistema Opera- 
cional (TK DOS) na memoria do com- 
putador, denomina-se "boot". Boot e 
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ATENCAO 

Voce.que possui um micro de tec- 
nologia SINCLAIR ZX81, a partir 
do proximo mes podera transfor- 
ma-lo em um poderoso micro, com 
a inclusao de 24 novas funcoes, 
tais como READ, DATA, RESTO- 
RE, TRON, e muitas outras. 



Instalacao de SLOW, HIGH 
SPEED, ALTA RESOLUCAO, 
PORTAS PARA COMANDO DE 
CARGAS EXTERNAS, TECLADO 
MECANICO, etc. para microcom- 
putadores de tecnologia SIN- 
CLAIR ZX81. 



Manutencao de microcomputado- 
res de tecnologia SINCLAIR e 
TRS. 



WILSON DEASSIS 

RUA FABRiCIO CORREIA, 145 

TUCURUVI 

FONE 203-7967 

CEP 02311 Sao Paulo - SP 



( Sinclair Place ^ 



O lugar 

compativel com 
os mini-micros. 

(Z X 81, TK 83, TK 85, 

CP 200, APPLY 300, 

TS 1000, RINGO, 

AS 1000, ETC...) 

MICROS 

ACESSORIOS 

SOFTWARE 

LIVROS 

REVISTAS 



Sinclair Place do Brasil 
Com. de Microcomputadores Ltda. 

Rua Dias da Cruz, 215 - Sala 804 
Ed. Meyer Golden Center 
CEP 20.720 - Meyer - Rio de Janeiro - RJ. 
V Tel.: (021) 594-2699 




• MICRODIGITAL — PROLOGICA 

• TK 83 TK 85 TK 2.000 

• CP 200 CP 300 CP 500 

• PROGRAMAS COMERCIAIS E 
JOGOS 

• SUPRIMENTOS 



• INTROD. A MICROCOMPUTADORES 
BASIC I Ell 

• AULAS PRATICAS E TEORICAS 

• 2 A3 ALUNOS POR MICRO 

• TURMASDE 12 ALUNOS 

• APOSTILAS E CERTIFICADOS 

• TURMAS ESPECIAIS PARA EMPRESAS 



ifiUwmiiniti 

fingtintoria a ediiureie ltda 

DEPTO. DE INFORMATICA 
AV. BRIG. FARIA LIMA, 2178-TEL.: 813-3338 
PINHEIROS — SAO PAULO - SP 
ESTACIONAMENTO 
ZONA AZUL 
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Micrqk 

ASSISTENCIA TECNiCA DE 
MiCROCOMPUTADORES E PERiFER'lCOS 

• Microdigital , Prologica , 

Dismac , Sysdata , Apple , 
Commodore 

• Confiabilidade 

• Rapidez 

• Suporte Tecnico 
Hardware e Software 



RUA BANDEIRA PAUUSTA 300 
ITAIM - SAO PAULO 

fone s 853-8640 





^=INFORMATICA 

FINALMENTE 

UMA LISTAGEM CONFlAVEL 

A melhor opcao em programas da logica 
Sinclair, listados em impressora e 
testados. 

Peca ja sua assinatura anual e receba 
gratuitamente uma Pasta-Arquivo para 
seus programas. 

A TROPICAL ainda Ihe 
oferece: 

- Microcomputadores e perifericos 

- Suprimentos e acessorios em geral 

- Desenvolvimento, venda e locacao de 
programas das logicas: Sinclair, TRS-80 
e Apple 

- Consultoria e servicos empresariais 

CONSULTE-NOS 
SEM COMPROMISSO 

TROPICAL INFORMATICA LTDA. 

AV. NOVA INDEPENDENCE, 281 CJ. 1 

FONE: (Oil) 533.497 1 - CEP: 04570 - BROOKLIN 

SAO PAULO -SP 



uma abreviapao de bootstrap , que foi 
tirada da expressao inglesa "to pull one- 
self up by one's bootstraps ", que em 
uma tradupao livre, significa "erguer 
alguem pelos cadarpos" (do sapato). 
Isto porque o Sistema Operacional auxi- 
lia muito uma pessoa, retirando-a da 
''lama''. 0 Sistema Operacional "alivia" 
o usuario de muitas tarefas de controle 
de disco, permitindo que ele dedique 
seu tempo ao seu programa propria- 
mente dito. 

Ao adquirir sua unidade de disco, 
urn disco especial acompanha o equi- 
pamento. Esse e denominado de Disco 
Mestre. Ele contem o Sistema Opera- 
cional e muitos outros programas apli- 
cativos. Atraves deste Disco Mestre e 
possivel colocar o Sistema Operacional 
em outro disco. 

Vamos entao colocar o Sistema 
Operacional na memoria. Para tanto, 
desligue o micro, abra a janela da uni- 
dade de disco e insira o Disco Mestre. 
Observe a posipao correta (etiqueta vol- 
tada para a parte superior direita), pro- 
xima ao seu polegar. 

Feche a janela. Ligue o micro e a 
unidade de disquete sera acionada e ao 
mesmo tempo o Sistema Operacional 
sera colocado na memoria. 

Retire o Disco Mestre e introduza 
urn disco novo. Este disco vem "liso" da 
fabrica, ou seja, vem com a pelicula 
magnetica, mas nao esta dividido em 
trilhas. Devemos inicializar esse disco 
(colocar as trilhas) para que possamos 
trabalhar com ele. 

Digite NEW e coloque um progra- 
ma qualquer, por exemplo: 



Programa do Mes 

Vamos ver um metodo para clas- 
sificar um vetor de tamanho M . 

0 metodo descrito chama-se BUR- 
BLE-SORT e consiste de comparacoes. 

Seja dado o vetor A com 4 elemen- 
tos e que contenha os numeros 9, 8, 7, 
6 e que nos desejamos que fique em 
ordem crescente. 



9 ^ 

8 

1 _ 

6 . 



0 metodo e: 



a) Compare a posipao 1 com a 2. Se 
1 > 2 entao troque de posipao. 



9 




8 


8 




9 


7 




7 


6 




6 



b) Compare a posipao 2 com a 3. Se 
2 > 3 entao troque 



8 




8 


9 




7 


7 




9 


6 




6 



c) Compare a posipao 3 com a 4. Se 
3 > 4 entao troque 



>5 REM DISCO NUM fP 1 

> 10 HOME 

>20 PRINT "DISCO # 1" 

> 30 END 



A seguir digite: INIT INICIO 

Ao ser pressionada a tecla RE- 
TURN, esse programa sera armazenado 
no disco com o nome INICIO. Ao mes- 
mo tempo seu disco sera "inicializado", 
ou seja, sera dividido em trilhas e colo- 
cado nas trilhas 0, 1,2, Sistema Ope- 
racional. 

Digite o comando CATALOG e vo- 
ce vera o nome INICIO aparecer na tela. 

Na trilha 17 do disco, reside o dire- 
torio. Neste lugar esta armazenado o 
nome e o endereco de seu arquivo. Ar- 
quivo e o nome do programa que voce 
gravou. 

Por que o diretorio reside na trilha 
17? Porque ao pesquisar se um deter- 
minado arquivo existe ou nao, a unida- 
de de disco posiciona o cabecote no 
meio do disco, minimizando a distancia 
a percorrer no caso de localizar o ar- 
quivo. 

Nos proximos artigos nos tratare- 
mos especificamente de Arquivos (Se- 
quencial e Randonicos), metodos de 
acesso, Arquivos Binarios (para gravar 
parte da memoria), Classificacao (sort), 
Hashing (Pesquisa), etc . . . 



8 
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7 




7 


9 




6 


JB 




9 



Ao fim dessa passagem, voce nota 
que o maior elemento esta na ultima po- 
sipao. 

Devemos repetir os passoa a, b no- 
va men te 



8 




7 




7 


7 




8 




6 


"6 




6 




8 


9 




9 




9 



A B 



Devemos repetir o passo a nova- 
mente 




Isto e, a cada passagem, reduzi- 
mos um passo. 

No inicio temos N — 1 passagens e 
depois 1 so passagem. 

No proximo numero daremos a so- 
lucao deste programa. O 
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Guebra-Cabeca: 
a Torre de Voguel 



Renato da Silva Oliveira 



Apos deixar a Inglaterra, Nabor Ro- 
senthal foi visitar um amigo na Alema- 
nha. Na ultima carta que ele me enviou, 
falou-me de uma certa torre que encon- 
trou no castelo de nosso amigo Friede- 
rich Voguel. 0 quebra-cabega deste 
mes consiste em descobrir, com o auxi- 
lio de seu micro, qual a altura da torre. 
Como Nabor escreve em sua carta, exis- 
te uma fdrmula que permite o calculo di- 
reto dessa altura; entretanto, queremos 
uma solucSo semelhante a que o Nabor 
utilizou, baseada em simulacao numeri- 
ca. Adiante encontra-se parte da carta 
que recebl, juntamente com os dese- 
nhos feitos por Nabor. 

"No primeiro dia em que estive no 
castelo de Friederich, ocupei todo o meu 
tempo em conhecer a milenar constru- 



gSo. 0 que mais me interessou, nesse 
dia, foi uma estranha torre que, aparen- 
temente, era intjtil. N3o havia como su- 
bir ao seu tdpo. No dia seguinte Friede- 
rich explicou-me que a torre era utilizada 
com uma escada m6vel que era introdu- 
zida em seu interior sempre que neces- 
sario. A escada deveria ser usada mais 
ou menos como mostram os desenhos 
que estou Ihe enviando. Friederich me 
disse ainda, que a escada ja nSo existe 
mais ha s6culos e durante todo esse tem- 
po, ninguem tern subido a torre. Pensa- 
mos, entSo, em fazer uma nova escada, 



mas para isso precisavamos saber a al- 
tura da torre. Devido a posigao em que 
ela estava, nao podiamos usar a sombra 
do Sol para medi-la; ent3o lembrei-me 
de um antigo problema de calculo ele- 
mentar. Medi a largura da torre e a altu- 
ra de sua entrada. Depois, como nSo me 
lembrei da formula para calcular a altura 
da torre e n2o quis perder tempo dedu- 
zindo-a, fiz um rapido programa para 
meu micro. Apos alguns instantes ne- 
cessarios para a simulagao de varias al- 
turas, ele me deu como resposta o valor 
13,6 metros. 



A TORRE DE VOGUEL: 
FIGURAS ENVIADAS PELO SR. NABOR 



DIMENSOES QUE ESCADA NA POSI<?AO 

EU MEDI INICIAL 




FINAL 
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Acabando com o problema de filas 
para Apple e TK 2000 



Victor Mirshawka 



4) Tempo medio de um cliente na fila 



A finalidade desse programa e a analise economica de 
um problema de filas, no qual supQe-se que a previsao de che- 
gada de clientes 6 atraves do modelo de Poisson. 0 tempo 
de atendimento dos clientes segue a lei exponencial, tem-se 
varios setores de atendimento, a disciplina para desfazer a fila 
e PCPS (ou seja: o primeiro a chegar, sera primeiro a ser ser- 
vido), o espago para espera e bem grande e a populagao que 
pode querer este servigo e muito grande. 

No nosso livro Pesquisa Operacional Vol. 2, editado 
pela Livraria Nobel, deduzimos as formulas para o processo de 
"nascimento e morte" e, como caso particular, obtemos o 
caso acima que representa-se de forma sintetica por (M/M/s): 
(PCPS/°°/«o ), ou seja, o modelo no qual tem-se s atenden- 
tes em paralelo, ou ainda, o caso em que s clientes podem ser 
atendidos simultaneamente (Fig. 1). 
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Figura 1 



Como se pode notar, e o que pode ocorrer em um pos- 
to de pedagio, nas bilheterias de um estSdio de futebol, nas 
caixas de um super-mercado, etc. 

As fdrmulas que demonstramos no nosso livro sao: 
1) Probabilidade do sistema estar ocioso 

p ='A. 

x /4 

A = taxa m6dia de chegada 
M = taxa m6dia de servigo 

= numero de setores de 
atendimento 



p o = 

s- 1 



1 



*(1) 



Z n s 

JL + JL. 

n! s! 



n = 0 



2) Probabilidade de se ter n clientes no sistema 



n! 



o 



( 2 ) 



T-^ P 0 

[s! s n ~ s 



3) Numero medio de clientes na fila 



E(L f ) 



P S M|P o 

(s- 1 )!(sM-X) 2 



(3) 



E(W f ) 



E(L f ) 

~T" 



P* M p o 

(s — 1 >! (syu - A ) 2 



( 4 ) 



5) Tempo medio no sistema, ou seja, o tempo medio da fila 
mais o tempo medio para um cliente ser atendido. 



E(W S ) = E(W f ) + J_ — ► (5) 

M 

6) Numero medio de clientes no sistema 



E(L S ) = X E(W S ) = X E(W f ) +-£- = E(L f ) + P 



( 6 ) 



— E muito importante que nesse modelo se te- 
nha ^ < 1 ou seja A < s M , pois, caso contr^rio, ou seja, se 
taxa de chegada ( X ) for maior que a taxa global de atendi- 
mento (s M), a fila ira aumentar cada vez mais e diz-se que o 
sistema vai "explodir". 

Na analise econdmica vamos procurar o custo minimo 
do sistema, levando em conta o custo do atendente (c 2 ) e o 
custo do cliente esperando no sistema (c^, ou seja, queremos 
um minimo de E (C t ) dado pela expressao: 



E(C t ) = c j E(L S ) + c 2 .s 



(7) 



0 programa permite exprimir cada parcela da formula 
7 em separado, alem de fornecer as probabilidades simples e 
acumuladas ate um limite especificado por voce, caro(a) lei- 
tor (leitora). 



O Programa 

Na organizapao do programa em BASIC para o seu 
TK-2000 Color observamos as seguintes etapas: 

a) Mensagens iniciais 

b) IntrodugSo e verificapao de parametros 

c) Processo de calculo 

d) Saida de resultados 

e) Apresentap3o da distribuigao de probabilidades 

f) Mensagem final 

Tabela I — Variaveis utilizadas no programa 





TABELA 1 


R$ 


variavel STRING na qual entra a sua resposta, 
caro (a) usuario (a) 


TC 


taxa m6dia de chegada ( X ) 


TS 


taxa m6dia de servigo ( /i ) 


S 


numero de setores de atendimento (s) 


PSI 


fator de utilizagao do sistema ( \p) 


p 


probabilidade de se ter um certo numero de clien- 
tes no sistema (P n ) k 


PA 


probabilidade acumulada [ 0 P n ] 


LS 


numero esperado ou medio no sistema [E(L s )j 


LF 


numero esperado ou medio na fiia LE(L J] 
tempo esperado ou medio no sistema [t(W s )l 


WS 


WF 


tempo esperado ou medio na fila [E(W f )j 


N 


numero de clientes no sistema (n) 


K 


limite superior para a distribuigSo de probabilidade 


Cl 


custo de espera por cliente por unidade de tempo 
(C,) 


C2 


custo do setor de atendimento ou da atendente 
por unidade de tempo (C 2 ) 


CE 


custo total de espera por unidade de tempo 


CS 


custo total de servigo por unidade de tempo 


CT 


custo total do sistema por unidade de tempo 
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1 REM MODELO M/M/S/PCPS 
5 REM MENSRGENS INICIAIS 
10 GOSUB 1000 

15 REM I NTRODUCAO E UERIFICACAG 
DE PARAMETROS 
20 GOSU6 1100 

30 REM PROCESSO DE CALCULO 
35 G0SU6 1300 

40 REM SAIDA DE RESULTADOS 
45 GOSUB 1450 

50 REM APRESENTACAO DA DISTRIBU 
ICAO DE PR0BA8 IL IDADES 
55 GOSUB 1550 
60 REM MENSAGEM FINAL 
65 GOSUB 1660 
78 IF R* = M S H THEN 10 
80 PRINT 

90 PRINT “E 0 FIM DO PROGRAMA" 
100 END 

1000 PRINT " ANAL I SE DO MODELO D 
E FIlA COM CHEGADA POISSON, 

I ADA EXPONENC I AL, UARIOS SET 
ORES DE ATENDIMENTO PCPS, GR 
ANDE ESPACO PARA ESPERA E PO 
PULACAO QUE SOLICITA DE SERU 
ICO MUITO GRANDE" 

1010 RETURN 
1100 PRINT ; PRINT 
1110 PRINT "TAXA MEDIA DE CHEGAD 
A u ; 

1120 INPUT TC 

1138 PRINT “TAXA MEDIA DE SERUIC 
0 ■ : 

1140 INPUT TS 

1150 PRINT "NUMERO DE SETORES DE 
ATENDIMENTO " ; 

1160 INPUT S 

1170 IF TC < S * TS THEN 1220 
1190 PRINT "CAPACIDADE DE ATENDI 
MENTO E INFERIOR A PROCURA" 
1200 PRINT "COM ESSES DADOS 0 PR 
OCESSO UAI EXPLODIR. ENTRE C 
OM OUTROS DADOS" 

1205 FOR Z = 1 TO 299: NEXT Z 
1210 HOME 
1215 GOTO 1100 
1220 PRINT 

1230 PRINT "CUSTO PGR UNIDADE DE 
TEMPO PARA" 

1235 PRINT "UM CLIENTE ESPERANDO 
<> ■ 

1240 INPUT Cl 

1250 PRINT "E PARA UM SETOR DE A 
TENDIMENTO GU ATENDENTE “j 
1260 INPUT C2 
1270 RETURN 
1308 PSI = TC / (S * TS) 

1310 REM UAMOS USAR UMA UARIAUE 
L AUX I LIAR T PARA OBTER A PR 
08AB I L I DADE <P0> DE TODOS OS 
ATENDENTES ESTAREM SEM SER 
UICU 



1328 


T = 


1 : P 


= 


1 




1330 


FOR 


N = 




1 TO S 


- 1 


1348 


T = 


T * 


S 


* PSI 


/ N 


1350 


P = 


P t 


T 






1360 


NEXT N 








1365 


P = 


P + 


T 


* s * 


PSI / <S * < 




1 - 


PSI ) 


) 






1370 


P = 


1 ✓ 


P 






1375 


T = 


T * 


S 


♦ PSI 


* PSI / (S * 




<1 - 


PSI 


) 


A 2) 




1380 


LF = 


T * 




P 




1385 


UF = 


LF 


/ 


TC 




1390 


US = 


UF 


t 


1 / TS 


1480 


LS * 


TC 


♦ 


US 




1418 


CE = 


Cl 


* 


LS 




1428 


CS = 


C2 


* 


S 




1430 


CT = 


CE 


+ 


CS 




1440 


RETURN 








1450 


REM 


A I 




UAI UM 


SUMARIO 



_ J 



1455 PRINT ^ 
M60 PRINT "NUMERO ESPERADO NO S 
ISTEMA “ : LS 

1470 PRINT "NUMERO ESPERADO NA F 
I LA " ; LF 
1475 PRINT 
I486 PRINT 

1485 PRINT "TEMPO MEDIO NO SISTE 
MR “;US 

1490 PRINT "TEMPO MEDIO NA FILA 
" ; UF 

1 49d PRINT 
1500 PRINT 

1510 PRINT "GUSTOS DO SISTEMA PO 
R UNIDADE DE TEMPO- 
1515 PRINT 

1520 PRINT "CLIENTE ESPERANDO 
";CE 

1525 PRINT "SETORES DE ATENDIMEN 
TO " ; CS 

1530 PRINT “TOTAL ";CT 
1535 FOR Z = 1 TO 299: NEXT Z 
1548 RETURN 
1558 PRINT 

1568 PRINT "DISTR I8UICA0 DE PROB 
ABILIDADES ATE UM CERIO NUME 
RO DE CLIENTES NO SISTEMA" 

1565 PRINT 

1578 PRINT "LIMITE SUPERIOR PARA 
A DISTRIBUICAO DE PROBABILI 
DADES" 

1575 IN.PUT K 
1588 PRINT : PRINT 
1585 PRINT "NUMERO"; TABC 10): “P 
R08A8 1 L I DADE “ ; TAB < 25): “PRO 
BAB IL I DADE " 

1598 PRINT TA8< 14>;“N0 PONTO"- 
T AB < 27); "ACUriULADA" 

1595 PA = P 

1600 PRINT TRB< 5);"0": TfiB< 11 
) ; P; TA825: PA 
1610 FOR N = 1 TO K 
1615 IF N > S THEN 1638 
1628 p = p * S * PSI / H 
1625 GOTO 1635 
1630 P = P * PSI 
1635 PA * PA t P 

1648 PRINT TAB< 5);N; TAB ( 11); 

P; TAB( 25 ) ; PA 
1645 NEXT N 
1650 RETURN 
1660 PRINT 

1630 PRINT " UOCE QUER ENTRAR COM 
OUTRO CONJUNTO NOUO DE DADO 
S <S/N ) ? “ 

1690 lNPUi R$ 

1708 IF R* ^ "S" THEN 1758 
1710 IF Rf = "N" THEN 1756 
1728 PRINT 

1738 PRINT "UOCE TECLOU H LEI RA 
COD I GO ERR ADA" 

1 >'40 GUTU 1668 

1750 RETURN / 



Suponhamos que um modelo (M/M/s): (PCPS/W»o) 
possa ser aplicado a um certo problema. 

Vamos achar o numero adequado de atendentes para 
que o custo total esperado seja minimo. 

Dados: 

Cl = 25 u.m/h -►Cl o custo de espera do cliente e 

u.m 6 unidade monet£ria 

C2 = 5 u.m/h -►custo do setordeatendimento 

TC =10 clientes/ h -► taxa media de chegada 

TS = 3 clientes/ h -► taxa media de servigo 

Note que deve-se comepar as tentativas a partir de S 
= 4 pois este e o menor inteiro tal que: S * TS = 4 * 3 > 
TC = 10. 

Termina-se o programa quando se obtem o menor CT e 
para isto ele deve estar confinado entre dois valores adjacen- 
tes maiores. 
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Adivinhe se e cara ou coroa? 




Um programs de Inteligencia 
Artificial para o TK 83/85 

Alvaro A. L. Domingues 

Sera que um programa com menos de 2 kBytes pode 
ser considerado inteligente? Tudo depende do que conside- 
ramos inteligente . . . 

Entretanto, temos um criterio que pode ser usado. Se 
voce leu nosso artigo sobre inteligencia artificial, "Podem as 
Maquinas pensar?" (Microhobby n°. 8), deve estar lembrado 
do teste de Turing. Basicamente, este teste diz que, se num 
jogo de imitagbo, uma pessoa nio distinguir, num conjunto 
de perguntas e respostas, se seu interlocutor 6 um homem ou 
uma maquina, podemos dizer que a ntequina, ou programa em 
teste, 6 inteligente. 

O jogo 

Ainda n§o se construiu uma rrtequina que passe neste 
teste em todas as situapbes possiveis, mas pode-se construir 
maquinas ou programas que ''se saem bem" em um ou mais 
campos; como, por exemplo, o programa Carla, que publica- 
mos na revista 12, que Simula um dillogo inteligente entre um 
psicanalista e seu paciente, ou o Sdrlu, que Simula uma 
crianpa brincando com cubos, esferas, cilindros e piramides. 

Nestes programas, o teste de Turing sete bem sucedi- 
do se o interlocutor humano, que o estiver aplicando, ater-se 
somenteao jogo. 

0 jogo que simularemos no TK e bastante popular nos 
Estados Unidos e muito simples, o que o torna atraente para 
uma simulapbo. Trata-se de adivinhar que face da moeda o 
adversario escolheu: cara ou coroa. Parece apenas mais um 
jogo de advinhapbo, que tanto.tem aparecido em revistas de 
programagbo. Entretanto este jogo tern o seguinte aspecto: 
o jogador que esconde a moeda do adversario vai adotar uma 
estrategia baseada no que conhece do adversario, ou numa ou 
outra caracteristica psicolbgica sua. Cabe ao adversario des- 
cobrir esta estrategia para poder comepar a ganhar. Quando 
o adversario ganhar um numero significativo de partidas, o 
primeiro jogador devete mudar de estrategia, uma vez que ele 
notou que o adversario descobriu seus truques. 

Quando o adversario perder um numero significativo de 
partidas, notate que o primeiro jogador mudou sua estrategia 
e tentara descobrir qual a nova estrategia. E assim sucessiva- 
mente. 

O programs 

0 TK 83 sera o primeiro jogador, ou seja, quern escon- 
de a moeda. Ele escolhera uma estrategia e vocb devete des- 
cobn-la, analisando seu comportamento. Quando voc£ ga- 
nhar um certo numero de vezes seguidas, ele mudara sua es- 
trategia e, ate que voc§ ganhe um numero significativo de ve- 
zes, quando entSo mudate a estrategia novamente. Isso con- 
tinuara indefinidamente. 

Quando o computador mostrar em sua tela a pergunta: 
COMEQO?, voc§ devete digitar um numero entre 1 e 65.535, 
que indicate ao computador qual a primeira estrategia que de- 
vete usar. A seguir o computador perguntate: 

(F)ACE OU (C)OROA? 

Voce, entSo, devete digitar uma letra para a sua esco- 
Iha: F para cara, C para coroa. Os pontos seteo indicados, jun- 
tamente com a mensagem de que vocb ganhou ou perdeu (fi- 
gural). 



tF) PC E 


OU tC) DROP 






w 

U U ! J U i- , 


UOCE GPMHOU 


R G NT GS = 


0 


(F ) PCE 


OU SC) OROP 






F 

JOGO 7 , 


UOCE GPMHOU , 


PONTOS = 




(F ) PCE 
0 


OU SC) OROP 






JOGO S , 


UOCE GPMHOU , 


PONTOS = 


L 


(F ) PCE 


OU SC) OROP 






F 

JO GO y 


UOCE GPMHOU , 


PONTOS = 




(F) PCE 


OU SC) OROP 






F 

J 0 G 0 1 0 


, UOCE GPMHOU 


: PONTOS 


= 4 


(F ) PCE 


OU SC) OROP 






JOGO 11 


; UOCE GPMHOU 


, PONTOS 


_ P' 


«F) PCE 


OU SC) OROP 






F 

JOGO li 


, UOCE PERDEU . 


, PONTOS 


= 4 


( F ) PCE 


OU t LOOKUP 







Fig. 1 



Listagem 

5 CL 5 

10 DIM R (8) 

15 SLOW 
IS SCROLL 

2S PRINT COHECO? !! 

30 INRUT X 
35 SCROLL 
40 PRINT X 
45 RRND i X ; 

50 LET J=0 

50 LET 1=0 

70 LET 1=1+1 

S0 IF I <3 THEN GOTO 140 

90 LET L = I NT C i M 4 N 4- 1 ) / 2 ) 

100 LET U=4*Q+2*L+R+1 
110 IF H ( U ) = 0 THEN GOTO 140 
120 Le I 5 = M 4 R C U 3 
130 GOTO 170 

140 LET 5 =2 4 I NT C24RND3 -1 
145 SCROLL 

170 H R I N ! :! ? F 3 H C E C U ( C 3 0 H G R : : 

1S0 IF INKEY±. = :: ■ THEN GOTO 1S0 
1S5 LET F S = INKEY E 

130 IF IN KEY $ = F 5 THEN GOTO 190 

20.0 IF F ±. < > i; F RND F £ C " THEN 

GOTO 1S0 

202 SCROLL 

205 PRINT FS 

210 LET K = 1 

220. IF F $ = :: F THEN LET U = -l 

230 LET J=J-54K 

240 LET Z =2 - I 

250 IF Z=0 THEN GOTO 320 

250 IF Z >0 "THEN GOTO 340 

L S 0 I F P, C y 3 = 0 THE H G 0 T 0 3 1 0 

290 LET R ( y 3 =© 

w 0 0 L U T U U L 0 

310 LET R ( y 3 =0 

320 LET N=M 

330 LET Q =R 

340 LET H = K 

3 d 0 Lei R = l NT i i 0 4 K 4 1 3 / 2 3 
3 50 Lei R E- = ; : G R N H 0 U .■ 

370 IF S=K THEN _ET R $ = ;i ReRDEU 

375 SCR CL _ 

3 S 0 H K I N i . 0 G G : I : , 1 J 0 C E i Hi 

i: R ONTO 5= , J 

3 9 0 G G i C / 0 
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HOBBYSHOP 



VEJA SE SUA CIDADE TEM 0 QUE VOCE PRECISA 



SAO PAULO 



Processamento de Dados Ltda. 

BASIC emTK 

Consulte as outras escolas. Voce sera nosso 
aluno. 

Av. Bernadino de Campos, 294 — 5? andar — 
Cj. 52 — Fone: 284-8352 — Metro Paraiso SP. 



UUti mm 

Loja de Microcomputadores 
TK-83-85-2000 - CP200-300-500; jogos - su- 
primentos — programas. 

Cursos Basic I e II 

Av. Brig. Faria Lima, 2178 — Fone: 813-3338 — 
Pinheiros SP. 




COMPUTADORES 



Cursos Basic, Cobol, Assembler 
A nova maneira de aprender a programar. 

Nucleo I: Av Pacaembu, 1280 — Fone: 66-7656 
- SP. 



EfXJE Com6rcio de Computadores Ltda. 
■■■ TK85 x TK2000? 

So na ENG voce adquiri o seu TK2000 nas me- 
Ihores condicdes e ainda da o seu velho TK83, 
TK85 ou CP200 como parte de pagamento. 
TK2000 e na ENG. Showroom - Tel. 284^1218. 
Av. Paulista, 1159 — Cj. 611. 



CENTRO 

PAULISTA DE 
INFORMATICA 

Curso de Basic "Promocao Especial” 

0 mais moderno curso de Basic de S. Paulo. 

Rua Itumaita, 349 — S/ — Cj. A — Esq. Brig, 
Luiz Antonio — altura n? 1000 — Fone: 35-4511 
Liberdade SP. 



0 , 



O O O MONOLITH 2001 

Eletronica e Jogos Com. e Exp. Ltda. 
Equipamentos TK85, Elppa II, Elppa Jr. e Color 
64. Jogos em Geral. 

Rua Augusta, 1371 S/L7 — Fone: 268-4370 — 
SP. 



SAO PAULO 



DATA RECORD INFORMATICA 

Cursos, Consultoria, Ass. Tecnica e Suprimentos 
Comece 85 programando! 

• Cursos Intensivos em Janeiro 

• Reserva devagas ate 21/ 12/84 

Cursos: Cobol • Basic I e II • Debase II • Aplicativos 
Vantagens: 1 aluno p/ Micro • Professores da USP 

• Estagio garantido • Bolsas de Estudo 

Av. Sto. Amaro, 5450 — Brooklin — Tel.: 543-9937. 



S. BERNARDO DO CAMPO - SP 




|*I I'OIJIHTA 



Software-House especializada no 
desenvolvimento de sistemas e cursos 
de treinamento para microcomputadores. 



Filial: R. Domingos J. Ballotim, 46 - 5? cj. 55- CEP 09700 - S.B. do Campo - Tel. 448-5970 



AfcC 



COMPUTAQAO 



A POLIVALENTE 
DA INFORMATICA: 



Cursos Basic, Assembler e Cobol. Microcompu- 
tadores — Suprimentos, Calculadoras, Orgaos 
Eletronicos, Software, Microclub. 

Av. Senador Vergueiro, 4962 — 1? andar — Sala 
6 — Rudge Ramos — S. B. Campo — CEP 
09720 - Tel. 455-1940. 



MINAS GERAIS 



(Sm puOub / 

Seja mais um amigo do Compu Club. Voce recebe: duas fitas com 
6 excelentes programas gratis de procedencia estrangeira e bole- 
tins do Compu Club regular e gratuitamente. 

Como fazer: indique o tipo de equipamento que possui, anexe 
cheque de $6.500,00/despesas de postagem. 

Compu Club CEP. 1795 CEP; 30000 — Belo Horizonte — MG. 



RIO DE JANEIRO 



PROSERV-Processaiento Dados. Cursos e Rep. Ltda. 

. HICROCGHPUTAD0RES IHovos e Usados) 

.CURSOS (Cobol. Basic. CP/K. DBase II) 

. SUPRIMENTOS (Foraularios. Disquetes. Fitas. etc.) 

•LIVROS E REVISTAS 

.SOFTWARE (TRS80. Apple. TK85) 

Lg.Nove de Abril 27 salas 626/628 
Tel: (0243) 429800 - V.Redonda - RJ 



RIO GRANDE DO SUL 



INFORMATICA DINAMICA LTDA. 

"AGRIMENSOR" 

Planilha de Calculo Analitico para agronomos, topografos e 
tecnicos agricolas. 

O programa para a familia Sinclair (TK83, 85, CP200) e mui- 
tos outros, que economiza horas de servicos. Remeter che- 
que de 6 ORTN para: 

Rua Minas Gerais, 56 — Sta. Rosa — CEP 98900 — Rio 
Grande do Sul. 
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Inteligencia Artificial: 

Tornando o computador 
mais esperto 




Caio Marques Bu/hdes 



"Na verdade o computador e um 
ser incapaz de raciocinar por si so. Ele 
nao pensa, apenas faz aquilo que o man- 
damos fazer. 0 computador nao morde 
ninguem." Johannes Zantwyk 

Quando tentamos explicar o que e 
um computador a uma pessoa que nun- 
ca o viu de perto, que nao sabe como 
funciona e nem o que faz, deparamo- 
nos com esta realidade. Ate agora, foi 
essa a imagem do computador, vendido 
pelos meios de comunicapao, um mons- 
tro capaz de pensar por seus prbprios 
meios e de dominar o homem e a socie- 
dade. Ironicamente, no entanto, o pano- 
rama comega a mudar para um estado 
geral de coisas inverso ao atual. 

0 que pode nos chocar, discutindo 
o tema Inteligencia Artificial e a idbia de 
que alguem construa uma coisa que 
"pense" por si mesma, nao possuindo a 
mesma natureza humana de quern a 
criou. A ideia desta "coisa pensante" 
que abrange todo o repertbrio cultural 
humano, mas aue nao e humana, certa- 
mente e uma iabia que nos causa estra- 
nheza, talvez pelo curto instante de tem- 
po que levamos para assimilar e deglu- 
tir as inovagbes tecnolbgicas que sur- 
gem a cada momento. 

Em 1982, os japoneses langaram o 
Institute for New Generation Computer 
Technology (ICOT), que se constitue na 
base de lanpamento do chamado Com- 
putador de 5® Geragbo. Eles prometem 
uma maquina capaz de dialogar com o 
usubrio em Linguagem Natural, ou seja, 
sem que seja necessario aprender qual- 
quer linguagem de programagao; algo 
prbximo de um supercerebro eletrbnico 
portatil, capaz de tomar decisdes com o 
minimo de interference humana, e, de 
uma certa forma, simular algumas rea- 
gdes emocionais humanas. Tudo isso 
entre 1988 e 1990, o que nos leva a crer 
que se o projeto vier a ser bem sucedido 
em todas as suas fases, causara uma re- 
volugao sem limites, quer seja no campo 
da Informatica, quer seja nas outras 
ciencias. 
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Histbrico 

Quatro anos apos o lanpamento do 
ENIAC, o primeiro computador eletrbni- 
co do mundo, Alan Mathieson Turing 
publica seu artigo, "Computer Machi- 
nery and Intelligence" (1950), no qual 
formula uma sbrie de perguntas englo- 
badas em uma unica: "as maquinas po- 
dem pensar?". Turing acreditava, que se 
fossem propostas b uma maquina e a 
um homem .uma mesma sbrie de per- 
guntas, e para um observador fosse im- 
possivel distinguir de onde vieram as 
respostas, entbo a maquina estaria apta 
a pensar. 

Posteriormente, varios programas 
escritos em linguagens especificas de IA 
passaram brilhantemente no teste; co- 
mo Parry, um programa que Simula um 
esquisofrenico dialogando com o usub- 
rio-psicanalista. 

Se o teste de Turing realmente ser- 
ve para medir a capacidade de inteligen- 
cia de uma maquina, ou nbo, e questio- 
navel. Em todo caso, o exemplo de Par- 
ry, e tantos outros, nos consubstancia o 
quanto as maquinas puderam crescer no 
sentido de imitar algumas capacidades 
humanas em t§o pouco tempo. 

Nos anos 50, o trabalho em Inteli- 
gencia Artificial cresceu consideravel- 
mente na Ambrica, com trabalhos sema- 
nais como o da The Advanced Research 
Projects Agency , que desenvolvia um 
sistema de tradupbo literal ingles-russo 
via computador. 0 sistema funcionava 
razoavelmente bem, mas considerando 
que todas as linguas possuem um indi- 
ce de redundance e que tradupbes lite- 
rals de expressoes idiomaticas ou de gi- 
rias nao podem ser levadas em conta, a 
tradugao do ingles "hydraulic ram" 
(ariete hidraulico) para o russo e a volta 
ao ingles "water goat" (cabra d'agua), 
fez com que o projeto fosse desativado. 

Um pouco mais tarde, Allen Newell 
e Herbert Simon criaram o programa 
Logic Theorist , que demonstra teore- 
mas Ibgicos; os dois autores predisse- 
ram que o computador viria um dia a ser 
Campebo Mundial de Xadrez e escrever 
composipbes musicais de genios dentro 
de 10 anos. 

No entanto, somente no fim dos 
anos 50, comeparam a aparecer efetiva- 
mente a pesquisa que levaria bs verda- 
deiras linguagens de Inteligencia Artifi- 
cial, uma vez que as outras linguagens 
de alto nivel, usadas ate entbo, haviam 
se mostrado falhas em muitos pontos, 
quer pela pouca flexibilidade de recursos 
de programacao, quer por restringirem 
bastante o uso da linguagem natural no 
dialogo usuario-maquina. A pesquisa 
forneceu um substrato muito grande pa- 
ra que a Inteligencia Artificial evoluisse 
ate o ponto de hoje. 



As Linguagens 

John McCarthy, membro do MIT 

— Massachussets Institute of Techno- 
logy, desenvolveu o "time-sharing", 
processo pelo qual uma unidade central 
de processamento pode ser partilhada 
por varios usubrios ao mesmo tempo e 
criou a linguagem LISP (aberviatura de 
LIST Processing), considerada a mae 
das linguagens de Inteligencia Artificial. 
Ate hoje, ela 6 a mais usada por ofere- 
cer uma grande eficiencia na constru- 
gao de modelos Ibgicos e processos 
cognitivos — processos de aprendizado 

— num computador. 

Sintaticamente poderiamos divi- 
dir a LISP em dois grupos: os atomos, 
que sbo sequences de caracteres alfa- 
numericos similares as strings do BASIC 
e as listas, que sbo seqiiencias de ato- 
mos encadeadas logicamente. 

Uma das caracteristicas mais mar- 
cantes do LISP e o uso espantoso de pa- 
renteses delimitando, logicamente, as 
separagbes entre um ou mais atomos 
e/ou listas. Embora muitos possam 
achar excessivas as quantidades de pa- 
renteses utilizadas, elas sbo necessarias 
para que a construgao do programa se 
fapa de maneira Ibgica, coerente e fle- 
xfvel. 

Em 1966 Joseph Weinzenbaun es- 
creveu "Eliza", um programa em LISP 
que Simula uma psicanalista em linha ro- 
geriana que conversa com o usubrio — 
paciente, (ver programa "Carla", Micro- 
hobby n°. 12). Eliza foi testada, pela pri- 
meira vez, com a secretaria do prbprio 
Weinzenbaun. O resultado foi tao sur- 
preendente que, num dado instante, ela 
Ihe pediu que saisse da sala, enquanto 
interagia com o programa em Lingua- 
gem Natural. 

Apesar de tudo, o programa tern 
bastantes limitapbes quanto ao vocabu- 
lario utilizado por Eliza e se, por exem- 
plo, perguntarmos a ela o significado de 
alguma palavra em ingles que desco- 
nhecemos, ela nos respondera que des- 
conhece tambbm significados de pala- 
vras em geral, mas que apenas enten- 
de . . . numeros binarios! Apbs um de- 
terminado tempo de dialogo, Eliza pa- 
rece esgotar seu repertbrio e tende a re- 
petir as mesmas perguntas inicialmente 
propostas. Mesmo assim, o programa 
fascina pelas possibilidades que abre. 

Outros programas celebres, como 
Eliza, tambbm foram escritos em Lisp. 
Entre muitos, poderemos citar Parry, o 
esquizofrenico que dialoga com o psica- 
nalista usubrio, Mycin, que auxilia (ban- 
co de dados) no diagnbstico de doenpas 
infecciosas; ou o Prospector, um pro- 
grama que descobriu uma mina de mo- 
libdenio no valor de milhbes de dolares. 

A facilidade de programagao em 
LISP e a sua grande extensbo em recur- 
sos fizeram com que LISP saisse dos 
computadores de grande porte para os 
micros. Assim, existem, compiladores 
disponiveis para o TRS-80 e versbes do 
Elisa para o Apple II. Com estes compi- 
ladores 6 possivel se montar uma base 
de dados de geografia informando, por 
exemplo, ao micro que a Bahia fica ao 
norte de Sbo Paulo; em seguida, se per- 



guntarmos ao micro qual a localizapao 
de Salvador em relapao a S3o Paulo, ele 
nos respondera que Salvador fica ao 
norte de SSo Paulo. 

LISP e PROLOG sao as linguagens 
que se espera serem usadas pelo proje- 
to japones do Computador de Quinta 
GerapSo. 

LOGO 

Usada primeiramente com objetivos 
educacionais, LOGO e uma linguagem 
que saiu do LISP. Tern muito mais faci- 
lidade de aprendizado do que o BASIC e 
permite uma visualizapSo mais rapida do 
algorltmo Idgico utilizado na construpao 
de urn programa. Por outro lado, a redu- 
pao do conjunto de instrupOes LOGO fez 
com que o caminho levado do aprendi- 
zado a pratica encurtasse bastante, o 
que quer dizer que ap6s pouco tempo de 
contato com a linguagem, a crianpa ja se 
habilita a programar em LOGO. Sintati- 
camente, as estruturas do LOGO po- 
dem ser confundidas com LISP, tama- 
nha 6 a semelhanpa entre as duas lin- 
guagens. 

A base da linguagem LOGO e uma 
tartaruga capaz de fazer desenhos, obe- 
decendo ordens quase conversacionais 
da crianpa. Existem versSes de compi- 
ladores LOGO disponiveis para micros 
compativeis com o Apple, com o TRS- 
80, ou para os que suportem o sistema 
operacional CP/M. No Brasil, os primei- 
ros micros da Itautec tinham essa 
linguagem disponivel em seu sistema 
operacional. 

Varios " computer camps' ' para 
crianpas est§o se utilizando dessa lin- 
guagem para promover um primeiro 
contato agradavel entre a crianpa e o 
computador. 

Das varias outras linguagens de in- 
teligencia artificial, que se seguiram 
apos o LISP, somente PROLOG conse- 
guiu unir as vantagens da linguagem 
m3e de uma maneira mais racional e fle- 
xivel. Estas duas continuam a ser as lin- 
guagens mais utilizadas, deixando-se 
entrever que, em pouco tempo, o apren- 
dizado de BASIC sera quase que total- 
mente desnecessario. 

PROLOG 

Conhecida desde 1970, PROLOG 
(PROgramming in LOGic) 6 uma lingua- 
gem que tenta a sintese entre um apro- 
fundamento em Linguagem Natural e a 
programap§o em I6gica. Dado a essa 
grande flexibilidade, ela tern serviao a 
objetivos di versos, como a pesquisa e 
criapSo de bancos de dados inteligentes 
assistida pelo programador, ou a con- 
cepp3o e realizapSo de sistemas tam- 
bem inteligentes. PROLOG e uma lin- 
guagem que se distingue facilmente das 
outras por n3o ter padrdes pre-defini- 
dos, nem tampouco estruturas de con- 
sole como o BASIC (IF . . . THEN . . . 
ELSE, GOTO, GOSUB). 

Um programa PROLOG se consti- 
tue somente de assergdes (fatos conhe- 
cidos) e de razbes (fatos condicionais), 
como na L6gica formal. Isso da uma 



grande flexibilidade e forpa h linguagem, 
alem de facilitar o programador na hora 
de construir o algoritmo Idgico e de oti- 
mizar o tempo que se espera para que a 
maquina nos fornepa a r^sposta. Mais 
ainda, ao construirmos sistemas com- 
plexes onde o uso das linguagens de al- 
to nivel se constitue numa dificuldade a 
mais na hora da conceppSo e posterior 
implantap§o: PROLOG se constitue 

numa grande ferramenta de apoio ao 
programador, pelo fato de aproximar-se 
em muito da linguagem natural. 

As caracteristicas do PROLOG nos 
mostram que a linguagem se aplica mais 
naturalmente a um tipo de problema do 
que a outros. Desta maneira, os proble- 
mas que envolvem uma grande quanti- 
dade de dados serao favorecidos, pois a 
linguagem se adapta melhor a este tipo 
de problema do que aqueles cuja mani- 
pulapio de dados 6 pequena. 0 
PROLOG tamb6m 6 uma linguagem po- 
derosa na manipulapao de dados simbo- 
licos, restrip3o feita por muitos usu£rios 
as outras linguagems de IA, como o 
Lisp, Logo ou o Smalltalk. 

No que se refere aos campos de 
aplicap3o do PROLOG, esta linguagem 
esta sendo utilizada tanto na compreen- 
sSo da linguagem natural como na ges- 
tao dos chamados bancos de dados re- 
lacionais, ajudando a criar uma base de 
dados dedutiva, ou seja, um programa 
que pesquisa inteligentemente bancos 
de membria atravbs de encadeamentos. 

0 PROLOG tern recursos muito for- 
tes, como a clausula de Horn, pela qual 
uma conclusSo Cl contem varias pre- 
missas pi, p2, p3 . . . pn encadeadas. 
Isso quer dizer que Cl somente ser£ ver- 
dadeira se pi e p2 e . . . pn tambbm fo- 
rem verdadeiras. A clausula de Horn tern 
uma sintaxe mais restritiva do que as re- 
gras utilizadas pelas linguagens de sis- 
temas inteligentes. Ela possibilita apli- 
capdes do PROLOG como sendo uma 
linguagem com orientapSo voltada para 
demonstrap3o de teoremas. 

Assim como o Lisp, o PROLOG tam- 
bem e disponivel para micros compati- 
veis com o Apple e IBM-PC, ou micros 
que suportem os sistemas operacionais 
CP/M-80, CP/M-86 ou ainda o Unix. 

De uma maneira geral, o interesse 
por PROLOG tern crescido considera- 
velmente e n§o ha duvidas que a lingua- 
gem se torne, dentro de pouco tempo, 
tao popular quanto o LISP e LOGO. 



Conclusdes finais 

Embora a Inteligencia Artificial es- 
teja na ordem do dia e suas linguagens 
estejam vindo a tona e se tornando cada 
vez mais populares, podemos observar 
que n3o conhecemos profundamente o 
cerebro humano o quanto poderiamos 
conhecer. Por exemplo, aquilo que se 
chama por pensamento, sabemos que 
corresponde a passagem de um estimu- 
lo eletrico provocado por uma reap3o 
eletroquimica, e que este estimulo tern 
um sentido que vai da ponta maior do 
neuronio a sua ponta menor. N3o sabe- 



mos, no entanto, qual e a linguagem 
"Assembly" do ebrebro humano, nem 
tampouco se existe a possibilidade de 
termos esse estimulo eletrico trafegando 
em sentido contrario, ou mesmo em du- 
pla-m3o. A despeito da divisSo dos dois 
hemisferios cerebrais e de sua conse- 
qiiente associapSo com habilidades de 
natureza diametralmente opostas dado 
esquerdo-racional, lado direito-emocio- 
nal), sabemos que pode haver redun- 
dance, ou seja, eventualmente este mo- 
delo pode ja estar inclusive superado. 
No entanto, o trabalho em Inteligencia 
Artificial prossegue, sendo seus campos 
de meta-conhecimento ("conhecimento 
do conhecimento") cada vez mais deli- 
mitados e claros. 

Em 1964 a Rand Corporation con- 
tra tou um filbsofo, Herbert Dreyfus, 
com o objetivo-de revisar o trabalho em 
Inteligencia Artificial, desenvolvido pela 
Companhia, e de propor criticas. 0 tra- 
balho desenvolvido por Dreyfus originou 
um livro, "What Computers can't do" 
(0 que os computadores n£o podem fa- 
zer), no qual o autor expbe com firmeza 
suas observapdes a respeito das limita- 
p6es humanas e das maquinas. 

A popularizap3o das linguagens vai 
fazendo com que o choque previsto pa- 
ra quando a maquina inteligente for lan- 
pada se atenue bastante, mas resta sa- 
ber agora o quanto o impacto deste lan- 
pamento interferira nas outras &reas de 
conhecimento humano. Mais ainda, o 
quanto estamos impotentes para convi- 
ver com um tipo de maquina que, quan- 
titativamente, falha menos que n6s, em- 
bora qualitativamente possa deixar mui- 
ta coisa a desejar. 

Enquanto a discussSo sobre Inteli- 
gbneia Artificial prossegue, oscilando 
entre o pueril e o filosoficamente mais 
profundo, sempre 6 tempo de parar um 
instante e rever o que fizemos, n3o s6 
no territdrio da Cibernbtica e de outras 
cibncias correlatas, mas tambbm em ou- 
tros campos. Para alcanpar um estbgio 
que nos permita efetivamente construir 
uma maquina inteligente, teremos que 
prosseguir ainda um longo caminho. Em 
todo o caso, a Inteligencia Artificial n3o 
ajudara apenas a tornar os computado- 
res mais espertos, mas ajudarb a nos tor- 
nar ainda mais inteligentes. o 
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Planilha Analftica 




Teste e texto final: Alvaro A. L. Domingues 



Este mes, escolhemos para anSlise uma fita bastante 
interessante para quern trabalha com agronomia. Trata-se da 
Planilha Analftica, um programa desenvolvido pela Informa- 
tica Dinamica para o TK 85 que facilita o trabalho do Agri- 
mensor. 

Uma das maneiras usadas em agrimensura para medir- 
se uma area de terra qualquer e o Levantamento Planimetrico. 
Neste metodo, representamos a arqa a ser medida por meio de 
um polfgono. 0 trabalho do agrimensor consiste em medir os 
angulos entre cada lado e a distancia entre os lados. 

0 primeiro dado a ser levantado e o angulo entre o 
primeiro lado e a direpSo norte. A este angulo da-se o nome de 
“primeiro azimute". Cada vertice do polfgono 6 chamado de 
"estap3o" e sSo numerados de 1 em 1. E normal ter-se 30 ou 
mais estapdes. 

Estes dados, levantados em campo, serao utilizados 
pelo tecnico para a elaborapao da planilha de calculo analf- 
tico, que mostra, em colunas, os dados lidos e os dados obti- 
dos por meio de calculos, tendo por base estes dados me- 
didos. 

Sem computador, a elaborapao da planilha e um ser- 
vipo muito demorado, devido £ quantidade de dados e calcu- 
los envolvidos. Geralmente uma planilha tern cerca de vinte 
colunas, que, no caso de termos 30 estapdes, como costuma 
acontecer, teremos que preencher cerca de 600 campos. 

Isto justifica a elaborapao de um programa especffico. 
A Informatica Dinamica, levando isso em considerapao, ela- 
borou o programa “Planilha Analftica", que estamos anali- 
sando este mes. 
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A fita 

Recebemos uma fita, enviada pelo correio, contendo o 
programa Planilha Analftica, fabricado pela Informatica Dina- 
mica Ltda., uma empresa localizada em Santa Rosa, Rio Gran- 
de do Sul. A embalagem e simples, sem uma indicapao muito 
visfvel de seu conteudo. 

A tftulo de "manual", acompanha duas paginas dati- 
lografadas, dando uma explanapao ligeira sobre o funciona- 
mento do programa. Acreditamos que isto pode ser melho- 
rado, fazendo-se um manual mais completo e melhor apre- 
sentado. 

Ao carregarmos o programa, notamos que a gravapao 
foi bem feita e n§o tivemos problema algum nesta operapao. 

O programa 

0 programa entrou rodando, mostrando logo no infcio 
uma pagina de apresentapao (figura 1). Apos uma pequena 
pausa e pedido o numero de estapdes e o primeiro azimute 
(figura 2). Estes dados sao necessarios para os calculos com a 
Planilha Analftica. 

A seguir sao pedidos os valores dos angulos e distancia 
de cada estapSo. Em todas as fases e oferecida a oportuni- 
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7- 7 7 7- *7- 7T T — 



4 4 4 4 
i 



4 

4 




3 b > 00 > 00 Niz 
349 > 0 7 > 04 NU 
213 > 14 >03 5U 
170 >52 >56 55 




3 5 > 00 >00 
10 > 52 :> 56 
3 3 > 1 4 > 0 3 
3 > 0 7 > 0 4 



mm 








i 


0 . 57353 


0 ,31315 


100 




0 . 15373 


0 , 4 b 4 0 : 4 


100 


■~Z\ 


0 . 54303 


0 , b b b 4 4 


100 


4 


0 , 15346 


0 , 9 5 7 3 5 


100 



400 





1 - 0.121 -0.S6S57.473 

2 -0.121 -0 . b56- 13 . 7b3 

3 - 0 . 121 -0 . 556-54 . 535 



4 - 0 . 12 3 - 0 . b 5 6 1 b , 3 5 4 

-0,4 3 S - 2 , 2 5 4 0 




-7 -7 


7- 7- 7- 7- 7- 7 i 7 7- 










1 


0 


0 


4 


57 « 473 


52 , 431 


3 


33 . 713 


151 . 243 


i 


- 1 b , 3 b 3 


35 . 171 


mm 


30 * 22 5 


351 . 3 


7- 7- -i- -i- 7- 


-7-7 7 7 7 7- 7- 7- 7- 7- 





7-7 7 7- 




-7 — -77-T-7-7-7-7-7-T-7-7-7-7- 7- 








i 


57 . 475 


b 4 . 4 b 1 


4 


4 b . 1 3 / 


2 5 3 . 72 9 


3 


22,75 


273 . 413 


4 


-15, 3 5 3 


93.171 


mm 


150 , 456 


72b , 3 


7- 7- 7- 7- 


7 77-7-7-7 77 7 — 


— 7- — — 7-7-7-7-- t 7-7-7-7-7--r--r-- 



ps 

-i. 4 7-4 0 r b 4 4' 4 

2 3501,0331 

3 -1330 . 0015 

4 1557.5327 
13313 « 523 



4740 . b 4 4 3 _ 

— 4 . 4 4 7 ,4 3 4 
-152 3 0 , 3 6 i 
1557 , 5327 

- 1 3 3 1 3 . 5 2 '•! 



= 0 5353,31 m2 



Fig. 3 



dade de correpbo. Apos a entrada de todos os dados, a tela 
mostra a soma dos angulos, o erro angular total e a soma das 
distances. 

Nesta fase temos, mais uma vez, a oportunldade de 
corrigir os dados. Se os resultados ai mostrados apresentam 
discrepancies com os dados de campo, podemos digitar a 
tecla V, que volta ao inicio, desta forma permitindo a digi- 
tap2o dos dados corretos. Qualquer outra tecla permits ao 
programa realizar os calculos. 

Os calculos s3o relativamente rapidos. Ao termin£-los, 
o programa oferece ao usuario tres oppbes: a) listar a planilha 
pa tela, b) listar a planilha na impressora e c) calcular nova 
planilha. 

Quando optamos por listar a planilha na impressora ou 
na tela, ela 6 mostrada em varias paginas, devido as limitapbes 
de largura da tela ou do papel da impressora (figura 3). 

Coment£rios 

Este programa e bastante especifico, destinado apenas 
aos profissionais que lidam com agrimensura. De uma forma 
geral, o programa 6 bom, apes ar de lento. As telas de apre- 
sentapSo poderiam ser mais rapidas, talvez usando-se rotinas 
em linguagem de maquina. 

0 programa e feito todo em BASIC, com apenas uma 
pequena protepSo contra "piratas". Esta protepbo nbo e mui- 
to eficiente, pois apenas faz com que o "pirata", momenta- 
neamente, se confunda com a listagem ou perca algumas 
variaveis. 

O manual poderia ser melhor apresentado, com mais 
detalhes sobre os metodos de calculo empregados e com 
alguns exemplos praticos de forma a familiarizar o usuSrio com 
seu uso. 

Como sugestbo aos fabricantes, sugiro uma simplifi- 
capbo das telas de apresentapSo e uma racionalizapSo da 
membria e, assim, poder ampliar a capacidade de calculo do 
programa, fornecendo outras funpbes e operapbes aos agri- 
mensores. O 







TENTE ESTA 



15 REH TENTE ESTA / TK 2000 
20 HGR2 

25 FOR H = 0 TO 7 

27 HC0L0R = H 

30 FOR X = 0 TO 250 

35 Y = INT (160 * RND (i)) 

40 HPL0T X,Y TO X + 3,Y + 3 

50 NEXT X 

55 NEXT H 

60 GOTO 25 



V J 
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DICAS 



O !f\IKEY$ NO TK 2000 



Uma das perguntas que mais tern a pa red do na 
Redacao e sobre como simular a funcao INKEY$ 
no TK 2000. Embora tenhamos dada uma resposta 
conveniente na secao Desgrilando da revista 13, 
este pequeno artigo resolve, para a! guns casos, 
o problema de uma maneira muito mais simples. 



Elson Euripes Delmutti 



Este e um programa "Pisca-Pisca 
Desenhista" de minha autoria para o 
TK-2000. 

0 programa em si nao tem nada de 
excepcional, e deve existir semelhantes 
as dezenas para os varios tipos de com- 
putadores. 0 que tem de novo e a linha 



100, onde o enderego 39 do TK-2000 faz 
a leitura de teclado. 

"Achei" este enderego quando 
comprei o TK-2000 e o mesmo veio sem 
o Manual Tecnico e o meu filho queria 
que os joguinhos ficassem mais anima- 
dos (eu estava usando as fungdes GET e 
INPUT). 

Como no Apple existe o enderego 
(— 16384) que faz a leitura de teclado, 
bolei o programa da figura 1 . 



10 


FOR 


N 


= 0 


TO 30000 


20 


PR I 


NT 


N 


; PEEK in) 


30 


FOR 


I 


= 1 


TO 20. IF 


I =20 G 


or 


O 


50 


40 


HEX 


T 


T • 


GOTO 20 


50 


N EX 


T 


N ' 












Figura 1 



E ficava movendo o Joystick para 
ver se o PRINT PEEK (N) se alterava. 
Como na verdade eu comecei experi- 
mentando do enderego 50000 para a 
frente, demorei um plantSo medico in- 
teiro para achar o PEEK (39). Valeu a pe- 
na. Podem explora-lo. 

PROGRAMA 

Apos digitar o programa da figura 
2, digitar RUN. Aparecera um ponto 
branco central e os numeros 3, 19, 19, 
no video (parte de texto), que corres- 
ponde a cor do ponto e as coordenadas 
que foram dadas na linha 170. Deve-se 
digitar os varios comandos que posi- 
cionam o cursor (setas: para baixo, para 
cima, para a esquerda e para a direita). 
No video ir-se-a formando as linhas e 
desenhos que queremos. 

Pressionando o ponto (FIRE), uma 
ou duas vezes, o ponto do video ficarS 
piscando e nada desenhara, movendo-o 
apagara linhas. Basta praticar. 



Nota: Embora o "macete" de usar-se 
PEEK (39) para ier o teclado gere um c6- 
digo diferente para cada tec/a pressio- 
nada, o valor deste cddigo e diferente do 
valor ASCII desta tec/a. Porta nto, aten- 
Qao quando for usar esta dica! 



10 REH PISCA-PISCA DESENHISTA 

12 REH P/ ELSON EURIPES DELHUTTI 

15 REH A GRANDE NOVIDADE E A LINHA 1 

00, ONDE TEHOS K = PEEK (39). 0 E 
NDERECO 39 DA A LEITURA DE TECLAD 
0, DE HODO SIHPLES E RAPIDO PARA 
JOGOS E PROGRAHAS EH BASIC. 

20 REH PEEK(39) CORRESPONDE AO PEEK( 

-16384) DOS APPLE E TEH A VANTAGE 
H DE NAO SE PRECISAR LIHPAR 0 STR 
OBE DE TECLADO. 

30 X = 19 
40 Y = 19 
50 N = 3 
60 GR 

70 COLOR = N 
75 GOSUB 200 
80 FOR I = 0 TO 100 
90 PLOT X,Y 
100 K - PEEK (39) 

105 IF K = 48 GOTO 70 

110 IF K = 46 THEN GET A*:N = VAL ( 

AS) 

120 IF K = 40 THEN GOSUB 200 



130 


IF K 


= 18 THEN X = X - i: 


IF ] 


0 THEN X = 


i: GOTO 70 




140 


IF K 


= 24 THEN X = X + l: 


if : 


39 THEN X 


= 38: GOTO 70 




150 


IF K 


= 36 THEN Y = Y - is 


IF ’ 


0 THEN Y = 


= is GOTO 70 




160 


IF K 


= 30 THEN Y = Y + i: 


IF ' 


39 THEN Y 


= 38: GOTO 70 




170 


PRINT 


n,x,y 




180 


GOTO 


70 




200 


REH 


H0VIHENT0 DO PISCA-PISCA 


205 


IF N 


= 0 THEN GOTO 210 




206 


IF N 


< > 0 THEN RETURN 




210 


COLOR 


= 3 




220 


PLOT 


X,Y 




230 


COLOR 


= 0 




240 


J = PEEK (39) 




250 


IF J 


= 13 THEN PLOT X + 


u 


260 


IF J 


= 24 THEN PLOT X - 


u 


270 


IF J 


= 36 THEN PLOT X ; Y 


+ i 


280 


IF J 


= 30 THEN PLOT X ; Y 


- i 


290 


IF J 


= 46 THEN N = 3 




300 


IF N 


= 3 THEN RETURN 




310 


RETURN 





Figura 2 
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Curso Avancado 

a 

de Assembly para o 

TK 83/85 



Nesta aula, iremos brincar urn pouco com 
a tela de TV. 



Aula 2 




Para comegar, facamos um pequeno programa para 
encher a tela de asteriscos (normais e em video reverso), usan- 
do "loop” dentro de "loop" (figura 1). 



LD HL;(D-FILE) '2A0C40' 


; carrega HL com enderego do 


INC HL 


'23' 


inicio da tela que e um NEW 
LINE 

; incrementa HL para indicar 1? 


LD B,22 


0616' 


posigdo "real" da tela 
; B = 22 para contador de linhas 


LD C,31 


0E1F' 


; C = contador de colunas para® 
; coloca em A o cbdigo de® 


LOOP LD A, 


'3E17' 


LD D,C 


'51' 


; coloca C em D para "preser- 


LD E,32 


'1E20' 


var" o valor de C durante LOOP 
; E = contador de colunas para® 


LOOP LD(HL),A 


'77' 


; coloca ®na tela D vezes 


INCHL 


'23' 




DECE 


'ID' 




DEC D 


'15' 




JP NZ, LOOP 


C2' 


; coloca em A o cbdigo de ® 


LD A,® 


'3E97' 


LOOPC LD(HL),A 


'77' 


; coloca * na tela (E—D) vezes 


INCHL 


'23' 




DECE 


'ID' 




JP NZ, LOOPC 


C2' 




INCHL 


'23' 




DEC L 


'0D' 




DJNZ POOPL 


'10E8' 


; decrementa B e volta para "im- 


RET 


C9' 


primir"a prdxima linha 



Fig. 1 



Experimente executa-lo em FAST e em SLOW para ver 
a diferenca. Procure fazer um programa equivalente em BA- 
SIC para comparar as velocidades. 

Voce deve ter notado que usamos o caractere * (su- 
blinhado) para indicar que seu codigo sera utilizado: 

LD A* 

Assim, uma instrucao do tipo: 



LD A, 22 


'3E16' 


; usa A como contador p / as 22 






linhas 


LOOP LD HL,(16396) '2A0C40 


; carrega HL com D-FILE 


LOOP INC HL 


'23' 


; incrementa HL p / "apontar o 
51.°caractere da tela 


LD D,H 


'54' 


; transfere HL para DE 


LD E,L 


'5D' 




INC HL 


'23' 


; incrementa HL pi "apontar" o 
2?caractere da tela 


LD BC,31 


'011F00 


; carrega BC com 31 (n?de carac 
teres a serem deslocados pi es- 
querda) 


LDIR 


EDBCf 




DECHL 


'2B' 


desloca os caracteres 


LD (HL),0 


'3660' 


; coloca "branco" na ultima co- 






luna 


INC HL 


'23' 




DEC A 


'3D' 


; decrementa contador 


JP NZ,LOOP 


C23575' 


; se nSo for zero repete pi a pr6- 
xima linha 


RET 


C9' 




Fig. 2 






5 REM 


*4 3CRC 


rL-L. L_ H T iz H P L_ 4 + 


10 PH 57 
15 RRND 
20 LET 






25 FOR 




T 0 4 


30 LET 


X = I NT C 


2 *RND ) 


35 LET 


H ^ =H 5 +C 


: H R $ ( I NT ( 54 *R N D 


40 NEXT 


T 




50 PR: IN 


T^H$ 




55 FOR 


1 = 1 t n 




50 RRND 


U 3 R 3 O 


• 0 0 0 



70 CL S' 



75 GOTO SO- 



LD A,B 

significa: "carregue o acumulador com o codigo do caractere 
B" e nao "copie o registro B em A". 

O Scroll Horizontal 

Voce esta lembrando do anti-SCROLL? Experimente 
agora, o programa da figura 2. 

Coloque-o a partir da memoria 30000 usando HEXA- 

MEM. 

Execute, ent3o, o seguinte programa em BASIC que 
demonstra o efeito de SCROLL para a esquerda. 0 inicio do 
programa, apesar de ser em FAST, e um pouco demorado, 
pois ele deve gerar 704 caracteres aleatorios . . . 



Que tal o efeito? Antes de prosseguir, tente entender 
detalhadamente o SCROLL-HORIZONTAL. 0 programa trans- 
fere para a esquerda linha por linha da tela utilizando a instru- 
gao LDIR. 



Como transferir programas em linguagem de m£quina do 
topo da RAM para dentro de um REM 

Caso voce deseje gravar, numa fita, este programa de 
SCROLL HORIZONTAL, basta transferi-lo para dentro de uma 
instrugSo REM. Voce pode inclusive retirar o HEXAMEM do 
computador usando NEW (desde que voce tenha se lembra- 
do de reservar memoria modificando RAMTOP). Assim, digi- 
te NEW e reserve espago num REM para que caiba o progra- 
ma de SCROLL LATERAL. 
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I REM 012 3 £55 73 90 123 4 55 73 90 12 



34 



A seguir, acrescente o seguinte programa: 



2 REM * 
5 PRINT 
10 INPUT 
15 pRit-rr 
20 PRINT 
25 INPiJT 
30 PRINT 
35 PRINT 
EM BYTES? 11 
40 INPUT 
45 FPST 



TPPNSFMEM ± 

"MEMORIP FONTE -7 " 1 
F 

" MEMOR IP DEBT ING? i! 

D 

TPMhNHG DO PROOPhMh 
D 



50 FOP 1=1 TO T 
55 POKE D i PEEK F 
50 LET D=D+1 
70 LET F =F + 1 
75 NEXT I 
SO PRINT 

35 PRINT ;: TPhN3FEPENCIh COMPLE 
9 1 1 



Execute o programa e coloque, entao, MEMORIA- 
FONTE = 30000, MEMORIA-DESTINO - 16514 e TAMA- 
NHO DO PROGRAMA EM BYTES = 23. Agora voce pode re- 
tirar o programa "TRANSFEMEM" linha por linha (nao use 
NEW) e, a seguir, pode salvar o REM que contem o programa 
SCROLL LATERAL: 

SAVE "HORSCR" (NEW LINE) 

Isto, logicamente, e valido para qualquer programa que 
estiver apos RAMTOP. (Obs.: Para executar o programa ago- 
ra e necessario fazer RAND USR 16514 e nao 30000). 

As sub-rotinas da ROM e a tela de TV; 
as pseudo instrugOes 

Como vimos na aula anterior, ja existe na ROM uma 
sub-rotina que "imprime" um caractere na tela, cujo endereco 
e '0808'; esta sub-rotina coloca na primeira posicao livre que 
houver na tela o caractere cujo codigo esta no acumulador. 
Vamos chamar esta sub-rotina de PRINTC (PRINT CARAC- 
TERE), e facamos um pequeno programa para chama-la (figu- 
ra 3). Usando HEXAMEM coloque-a a partir da memoria 
16514. Para isto, reserve espaco no infcio da memoria do 
programa com uma instrucao REM: 



1 REM 0123455739 



LOOP 


LD A, '3C' 


'3E3C ' 


('3C ' 6 o cddigo do caractere 
W) poderia ser escrito como 
LD, A,W onde o trago indica 
"caractere" 


CALL 


PRINTC 


'CD0808' 




JR 


LOOP 






Fig. 3 



Execute-o em FAST e, a seguir, coloque o computadoi 
em SLOW e repita o programa fazendo RAND 16514. Nao se 
preocupe com a falta da instrucao RET: nesse caso, o pro- 
grama volta automaticamente ao BASIC ao terminar a tela. 
Repare na velocidade nos dois casos. A titulo de compara- 
cao, execute o seguinte programa BASIC em SLOW e FAST: 




2000 PRINT 5i U" ; 

2005 PUN 

Vamos agora implementar a sub-rotina para que ela im- 
prima qualquer mensagem e nao apenas um caractere; neces- 
sitaremos, para tanto, de um "codigo" para indicar ao compu- 
tador "fim de mensagem". Utilizaremos o numero '43", ja que 
ele nao e codigo de nenhum caractere. 

Vamos tambem adicionar ao nosso vocabulario de 
mnemonicos mais duas "pseudo-instrucdes": 

DC = defina constante 

DM = defina mensagem 

Elas s3o chamadas de pseudo-instru^des, por nao te- 
rem correspondente codigo hexadecimal. Servem apenas pa- 
ra tornar mais clara a escrita de um programa. Observe entao o 
seguinte exemplo da figura 4. 



'408E' 


CALL 


PRINTM 


'CD8240' 


'409V 


DM APOCALIPSE 'APOCALIPSE' 


'409B' 


DC 


'43' 


'43' 


'409C' 


RET 




'C9' 


Fig. 4 








e suponha que, a seguir, 


facamos o que mostra a figura 5: 


i 408E' 


'CD' 






'408F' 


'82' 






'4090' 


'40' 






'409T 


A 






'4092' 


P 






'4093' 


0 






'4094' 


C 






'4095' 


A 






'4096' 


L 






'4097' 


1 






'4098' 


P 






'4099' 


S 






'409A' 


E 






'409 B' 


'AB' 






'409C' 


'C9' 






'4082' 


PRINTM 


POP HL 


'El' 


'4083' 




LD A,(HL) 


'7E' 


'4084' 




INC HL 


'23' 


'4085' 




PUSH HL 


'E5' 


'4086' 




CP '43' 


'FE43' 


'4088' 




RETZ 


'C8' 


'4089' 




CALL PRINTC 'CD0808' 


'408C' 




JR PRINTM 


'18F4' 



Figura 5 



52 MICROHOBBY 




Primeiramente repare que as "pseudo-instrupdes" DM 
e DC n§o tern correspondente codigo hexadecimal; na memo- 
ria e colocado apenas o cddigo dos caracteres da mensagem 
ou da constante. 

Voce esta lembrado como funciona a instrupSo CALL? 
Ela faz um PUSH, ou seja, coloca no STACK no enderepo de 
retorno da sub-rotina e, a seguir, ela carrega o PC com o en- 
derepo inicial da sub-rotina que estS sendo chamada. Logo a 
seguir a letra A da mensagem APOCALIPSE, que estd ap6s o 
CALL PRINT M, estara no enderepo indicado pelo topo do 
STACK ap6s ser executado o CALL, pois ela corresponde ao 
enderepo de retorno. Assim, se fizermos um POP HL, no par 
HL teremos o enderepo da letra A e basta, ent3o, fazer LD A 
(HL), para colocar o cddigo da mesma no acumulador. 

Ao incrementar HL e fazer um PUSH HL, o SP estd 
agora apontando para a letra P. Basta entao repetir o proces- 
so ate encontrar o numero '43' que indica fim de mensagem, o 
que e feito pela instrup^o CP '43' que testa a igualdade entre o 
ACUMULADOR e o numero '43'. Em caso afirmativo, a sub- 
rotina PRINTM ira retornar, estando o "topo do STACK" indi- 



cando o enderepo logo ap6s o numero '43', no caso, um RET 
para o BASIC; em caso negativo, basta chamar a sub-rotina 
PRINTC para imprimir o caractere que est2 no acumulador. 

Vamos entSo colocar este programa na memoria atra- 
ves de uma instrupSo REM; fapa: 

1 REM 01234557590123456769012 
3455 

para reservar os 27 bytes necessarios; a seguir, use HEXA- 
MEM colocando 16514 ('4082') para enderepo inicial; introdu- 
za os cddigos hexadecimais das instrupOes e, ao chegar em 
APOCALIPSE, basta introduzir os codigos de cada letra e a 
palavra sera colocada na memoria diretamente. Ao terminar 
de introduzir o programa ne memoria NAO digite XS ou XF, 
pois o infcio do programa esta, na realidade, na memoria 
16526. Assim, digite P e, a seguir, RAND USR 16526 (NEW 
LINE). 

Note que se colocarmos um codigo de NEW LINE no 
meio da mensagem teremos um efeito de "pular linhas"; de 
fato digite: 

POKE 16533,118 

(1 18 e codigo deNEW LINE) 

RAND USR 16526 

Tente explicar o que aconteceu. 

Exercicios 

1. Modifique o programa de SCROLL HORIZONTAL 
para que ele fapa um SCROLL para a direita. 

2. Unindo os conceitos de SCROLL VERTICAL e 
SCROLL HORIZONTAL, fapa um programa que realize o 
SCROLL em diagonal . . . 

3. Como voce faria um programa com o TRANSF- 
MEM em linguagem de maquina? 



RESPOSTA DO QUEBRA-CABEPA 

* 




Neste mes recebemos duas respostas ao quebra-cabe- 
pa proposto na revista 12: Criptoanagnose. 

A primeira delas, enviada por Mario M. Monteiro, ape- 
sar de correta a interpretapSo da mensagem, n§o acertou o 



cddigo de decifrapao. Ele nos forneceu um codigo de 3 alga- 
rismos, quando dissemos que o Sr. Nabor sempre utilizava 
cddigos de 4 algarismos. Embora o numero que ele tenha 
fornecido tambdm "abra" a mensagem, n§o a consideramos 
correta. 

A segunda solupao veio mais completa. 0 Sr. Fabio de 
Souza Freitas analisou o problema e descobriu a chave que o 
Sr. Nabor utilizou a resolver o problema: 

"Esta carta contem a solupao do quebra cabepa "Crip- 
toanagnose" que foi apresentado na revista 12. 

"1?) A chave utilizada pelo Sr. Nabor e 1984. 

"2?) A mensagem foi decodificada no programa da pagina 33 
da revista 12 (TK-decriptografo) e esta mostrada na figura 1. 



C P; k 0 5 P M I 0 5 : P M I C R 0 H Q 5 5 Y - 

ES7DU ENv IP ND0-L HE 5 PEL0 
CQPRnlQ 5 LITRuS IE 5UC0 CONCEM 
i R p D 0 D E M 0 R H N 6 0 5 5 1 _ U E 5 7 R 5 5 C U L 
TIUP DGS PQUI NP INDIP POP MEU PM 
100 izhl * , QUPND0 EU RE73RMP 
H P 0 dkPSIL PODEPEI F0RNE0ER -LHE 
5 Dt MIN HP PR0PRIP FP5PI0P0P0, P 
0R EHQUPH7C EU E5PER0 1.5 VOCE 5 
N P 0 M 0 7 5 M r. T;-Pp Hi 




Figura 1 
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Computadores para Usuarios 




Coordenador: Jorge da Cunha Pereira 
Fiiho — Editora Campus 

A obra “Computadores para Usua- 
rios" esta dividida em quatro volumes e 
destina-se a profissionais, tanto da alta 
administrapao, como dos niveis inter- 
mediaries e supervisors. Sao livros de 
cunho informativo abrangente, que co- 
brem desde a aplicapao dos computa- 
dores nas principais areas, passando pe- 
la descripao dos equipamentos (hard- 
ware) e dos programas (software), ate a 
metodologia de selepao de computado- 
res, com o intuito de fornecer o maior 
numero de informapoes no menor espa- 
po possivel. 

Para facilitar o aprofundamento nos 
assuntos de maior interesse do leitor, ou 
mesmo aqueles n§o tratados de forma 
satisfatoria, os livros apresentam uma 
bibliografia para consulta. 

Alem de util aos profissionais da 
area, os livros funcionam como fonte de 
pesquisa para estudantes cujo curricu- 
lum escolar inclua processamento de 
dados. 

Para a elaborapao da obra, o autor 
contou com o apoio de profissionais e 
professores com atuapao em uma ou 
mais areas especificas, os quais descre- 
veram urn panorama geral de cada 
assunto. S.A.M. 




Alem dos oitos capi'tulos, a edipao 
brasilesra do Apple- Guia do Usuario 
adicionou alguns apendices que abor- 
dam assuntos importantes como: codi- 
gos de caracteres; bibliografia; uso da 
memoria; tabela de conversao; entre 
outros. 

A preocupacao do autor e enfatizar 
a programapao mais do que a teoria, 
para que o leitor tenha a oportunidade 
de desenvolver "manhas" de progra- 
mapao do modo mais rapid© possivel. O 
nivel matematico foi abordado de formp 
superficial para que nao so o matemati- 
co ou o fisico entendam as informa- 
poes, mas tambem o biologo, o admi- 
nistrador ou qualquer outro profissional 
que nao esteja ligado a area de Exatas. 

Processamento de Dados — Conceit© 
basico/Hardware — Volumes I e II 



Carl Townsend 



0 manual dBase II e o mais novo 
lanpamento da McGrawHill e conserva, 
como seu original em ingles, a mesma 
capa. 0 livro inicia-se com "Instalation", 
passa por "Information File Organiza- 
tion", "Records/ Databases", condu- 
zindo o leitor as tecnicas deste software 
para gerenciamento de banco de dados. 
Ele segue a linha de pubticapoes da edi- 
tora para orientar o usuario que preten- 
de elaborar sistemas, realizar progra- 
mapoes estruturada, etcetera. 



APPLE 



Guia do Usuario 



Robert J. Verzello , , John Reutter 



0 livro inicia-se com um prefacio 
onde os autores, resumidamente, intro- 
duzem o leitor ao Processamento de 
Dados. Neste primeiro contato, o livro 
fornece, ao leitor, informapoes acerca 
da importancia do processamento de in- 
formacoes em organizacoes modernas e 
os principais conceitos do Processa- 
mentp de Dados. 

E, como os anteriores, um guia a 
educadores e profissionais da area. Os 
autores afirmam, no prefacio, que os 
dois volumes do livro destinam-se a for- 
necer uma estrutura de conceitos que 
coloca assuntos interligados como: sis- 
temas, dados, processamento, compu- 
tadores e linguagens de programapao — 
em perspectivas manuseaveis, indepen- 
dentes de qualquer hardware ou soft- 
ware. Dentre os objetivos do livro, des- 
tacam-se: prover o aluno com conceitos 
basicos para o estudo do processamen- 
to de dados; equipa-lo com ferramentas 
que possuam aplicapoes e configura- 
poes de hardware especificas; mostrar- 
Ihe o significado de traduzir graficamen- 
te a logica dos procedimentos; prepara- 
lo para as novas enfases em industria e 
informar sobre as tecnologias com as 
quais o aluno certamente entrara em 
contato. 



Lon Poole, Martin McNiff, Steven Cook 



Bastante procurado pelos usuarios 
do Apple, este guia traz todas as infor- 
mapdes necessarias de utilizapao do mi- 
crocomputador Apple II. 0 livro possue 
oito capitulos. Os primeiros falam sobre 
o hardware do Apple II e os demais pros- 
seguem abordando temas como: Pro- 
gramando em BASIC; 0 gravador cas- 
sete; Carregando e rodando um progra- 
ma; Modo imediato e programado; Co- 
mandos do BASIC; Funpoes; Guardan- 
do dados em cassete; 0 sistema oper- 
cional em disco; Graficos de alta reso- 
lupao; Monitor de linguagem de maqui- 
na, etc. 
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